如何獲取perl中嵌套散列內部散列的大小？

Question

我有以下哈希散列：

%tgs = (
'articles' => { 
        'vim' => '20 awesome articles posted', 
        'awk' => '9 awesome articles posted', 
        'sed' => '10 awesome articles posted' 
       }, 
'ebooks' => { 
        'linux 101' => 'Practical', 
        'nagios core' => 'Monitor' 
       } 
); 

我使用如下：

$size = scalar keys (%{tgs{'articles'}}); 

，但它無法正常工作。

Answer 1

這$size = scalar keys (%{$tgs{'articles'}});應該做的伎倆 - 你忘了$印記。

其中my $size = keys %{ $tgs{articles} };是比較慣用的perl。

Answer 2

你缺少美元符號：

my $size = scalar keys %{ $tgs{articles} };