Perl％{$ var}と％$ var

Question

%{$var}と%$varの違いは何ですか？私はこのコードを試してみましたが、エラーがあります：

each on reference is experimental at test.pl line 21. Type of argument to each on reference must be unblessed hashref or arrayref at test.pl line 21.

use feature 'say'; 

%HoH = (
    1 => { 
     husband => "fred", 
     pal  => "barney", 
    }, 
    2 => { 
     husband => "george", 
     wife  => "jane", 
     "his boy" => "elroy", 
    }, 
    3 => { 
     husband => "homer", 
     wife  => "marge", 
     kid  => "bart", 
    }, 
); 

for ($i = 1; $i <= 3; $i++) { 
    while (($family, $roles) = each %$HoH{$i}) { 
     say "$family: $roles"; 
    } 
} 

は、しかし、このコードは正常に動作します：

use feature 'say'; 

%HoH = (
    1 => { 
     husband => "fred", 
     pal  => "barney", 
    }, 
    2 => { 
     husband => "george", 
     wife  => "jane", 
     "his boy" => "elroy", 
    }, 
    3 => { 
     husband => "homer", 
     wife  => "marge", 
     kid  => "bart", 
    }, 
); 

for ($i = 1; $i <= 3; $i++) { 
    while (($family, $roles) = each %{$HoH{$i}}) { 
     say "$family: $roles"; 
    } 
} 

Answer 1

%$HoH{$i}で%{$HoH{$i}}であなたはハッシュリファレンスを作成しているときに、$ HOHのハッシュリファレンスを作ります$HoH{$i}、あなたが望むものです...そしてあなたのコードに:-)

Answer 2

それは解決の異なる優先順位のためにハッシュとハッシュのサブスクリプション。それは$HoH{$i}の参照によって返された値がハッシュリファレンスであることを明白に述べているので、第2のバージョン（%{ $HoH{$i} }）と一緒に動作します。

%$HoH{$i}は、%{ $HoH }{$i}と解釈されます。サブスクリプティングは式$HoHがハッシュリファレンスとして解釈された後に起こります。ハッシュリファレンスではありません。 %HoHはハッシュですが、$HoHは使用されません。つまり、未定義です。