Select Code to Download

package Car;
use strict;
use warnings;
...
}

1;

my $car = Car->new();
$car->drive_type('fwd');
$car->body_type('hatch');
$car->engine_cap('1798');