Select Code to Download

$key1 = each %hash;
...
$key2 = each %hash;
...
$key3 = each %hash;

@h{ 'a'..'z' } = 1..26;;
print each %h;;
...
o => 15
print each %h;;
w 23