經過散列子程序

Question

我已經通過子程序做印刷哈希鍵/值對一個簡單的Perl腳本

#!/usr/local/bin/perl 

#passing hash to a subroutine 

sub printhash{ 

      my (%hash) = @_; 

      foreach my $key (keys %hash){ 

        my $value = $hash{$key}; 

        print "$key : $value\n "; 

      } 

} 

%hash = {'name' => 'devendra', 'age' => 21}; 

printhash(%hash); 

預期輸出：

名：德文德拉

年齡：21

輸出：

HASH（0x1be0e78）：

它有什麼問題？

Answer 1

此行

%hash = {'name' => 'devendra', 'age' => 21}; 

試圖分配一個匿名散列參考散列。你真正的意思是

%hash = ('name' => 'devendra', 'age' => 21); 

如果你有use strict和use warnings你會看到消息

參考發現，甚至大小列表預期

cluing你的問題。始終使用它們！