my %auto;
$auto{'ford'}{'F150'}{'color'} = 'RED';
@auto{'ford'}{'F150'}{'tires','lights'} = ('ALL SEASON','HALOGEN');
print Dumper \%auto;