use Perl6::Classes;
    
class Car {

        # Only with Perl6::Classes,
        # Perl 6 takes care of it
    submethod BUILD { 
        my %hash = @_; 
        $.model = $hash{model}; 
    }

    has $.model;

    method drive() { 
        print("$.model drives\n"); }
}

my $car = Car->new(
    model  => "Acura Integra");

$car->drive();