sub get_as_array { my $self = shift; return [ $self->{engine}, $self->{wheels} ]; }