Select Code to Download

#!/usr/bin/perl
use warnings;
...
    }
    print "\n";
}

~/perl/monks$ ./array-to-hash.pl 
H1 :  23  63  22 
H2 :  42  33  33 
H3 :  34  66  49