Help for this page

Select Code to Download


  1. or download this
    package Wheel;

...
}

1;
  2. or download this
    package Body;

...
}

1;
  3. or download this
    package Engine;

...
}

1;
  4. or download this
    package Car;

...
}

1;
  5. or download this
    package PrintVisitor;

...
}

1;
  6. or download this
    #!/usr/bin/perl

...
my $visitor = PrintVisitor->new();
$car->accept($visitor);