my $array = [];    #create new anonymous array ref
push (@$array, '11');
push (@$array, '12');
push (@$array, '13');
$hash{'first'} = $array;   # add

$array = [];   #create a new anon-array
push (@$array, '21');
push (@$array, '22');
push (@$array, '23');
$hash{'second'} = $array;  # add

print "Hash content\n";
foreach $k (keys %hash) {
   foreach (@{$hash{$k}}) {
      print " : $_";
   }
   print "\n";
}
[download]