Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"my %hash1 = map { $_ => 1 } 1 .. 5;
...
key 4 and a
key 2 and b
key 5 and b