foreach (keys %hash) { print "$_\t$hash{$_}\n"; }