Displaying the contents of a hash

Perl 5:

for (keys %h) { 
    print "$_ = $h{$_}\n";
}