如何用 Perl 打印 hash 的内容？

Question

I keep printing my hash as # of buckets / # allocated. How do I print the contents of my hash?

Without using a while loop would be most preferable (for example, a one-liner would be best).

转载于:https://stackoverflow.com/questions/1162245/how-can-i-print-the-contents-of-a-hash-in-perl

Answer 1

Easy:

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

Elegant, but actually 30% slower (!):

while (my ($k,$v)=each %h){print "$k $v\n"}