Select Code to Download

uno = uno
...
tre = tres
quattro = quatro
cinque = cinco

use strict;
use warnings;
...
close $in;
#print "this is the data\n";
dump \%hash;