Help for this page
%mapp = (); @arr = ("R", "T", "HH", "M"); $mapp{"FirstKey"} = \@arr; ... push(@val, "RBB"); $mapp{"FirstKey"} = \@val; print join (",", @{$mapp{"FirstKey"}}) . "\n"; #an array reference wi +ll be printed
R,T,HH,M ARRAY(0x7ffafc013bf8),RBB