的Perl：如何循環遍歷一個哈希

Question

我發現了很多不同的答案對這個問題，並沒有一個似乎工作

這裏是我有（？！）：

my %FORM = ["a"=>"0AD", "b"=>"johnny manziel", "c"=>"lincoln"]; 
#my @k = keys (%FORM); 
#for my $iter (@k) { print "$iter\n"; } 
#for my $key (keys %FORM) { 
# print "\t"; 
# print $FORM{$key}; 
# print "\n"; 
#} 

while (($key, $value) = each %FORM) 
{ 
    print "key: $key, value: $FORM{$key}\n"; 
} 

典型輸出：

./testprinthash.pl 
key: ARRAY(0x13a2998), value: 

我總是得到一個數組，而不是一個鍵值

Answer 1

你想用括號的210分配給散列時，不是方括號[ ]。

my %FORM = ("a"=>"0AD", "b"=>"johnny manziel", "c"=>"lincoln"); 

的[ ]創建一個數組參考，這是不是你想要的。

檢查

• http://perldoc.perl.org/perlref.html
• http://perldoc.perl.org/perlreftut.html