Select Code to Download

%hash = (a=>1, b=> 2, c=>3);
foreach (keys %hash) {
    print "\$hash{$_} = $hash{$_}\n";
}