如何在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'}});应该可以解决问题 - 你忘记了$ sigil。

my $size = keys %{ $tgs{articles} };更像是惯用语。

Answer 2

你错过了美元符号：

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