Help for this page
Select Code to Download
Select
or
download this
my %vehicle; @{$vehicle{truck}} = (1, 2, 3, 4);