Help for this page
Select Code to Download
Select
or
download this
keys %hash; # Reset iterator while (my ($k, $v) = each(%hash)) { ... }