Select Code to Download

{
    package Car;
...
);

print $car->dump;

{
    package Corolla;
...
my $corolla = Corolla->new;

print $corolla->dump;