package Car;
our @ISA = qw(Vehicle);
# nothing related to Class::SingletonProxy goes here!

sub wheels { 4 }