Select Code to Download

$hash = ( uno => [ 'uno' ],
          due => [ 'dos' ],
          # and so on
         );

# by assigning directly to the second element of the sub-array
$hash{$italian}[1] = $french;
...
          due => [ 'dos','deux' ],
          # and so on
         );

for my $key (keys %hash){
  print $key, ' => ', join ' , ', @{$hash{$key}}; # dereference sub-ar
+ray
  print "\n";
}