use base Vehicle;
@ISA = 'Vehicle';