perl - 为什么 Perl 的 shift 会提示 'Type of arg 1 to shift must be array (not grep iterator).' ？

Question

我有一个数据结构，它是一个包含散列数组的散列。我想到达那里并拉出与我正在寻找的值相匹配的第一个哈希值。我试过这个:

   my $result = shift grep {$_->{name} eq 'foo'} @{$hash_ref->{list}};

但这给了我这个错误: Type of arg 1 to shift must be array (not grep iterator).我重新阅读了 perldoc为 grep我认为我在做的事情是有道理的。 grep返回一个列表，对吗？是在错误的上下文中吗？

我现在将使用一个临时变量，但我想弄清楚为什么这不起作用。

Answer 1

A list isn't an array .

my ($result) = grep {$_->{name} eq 'foo'} @{$hash_ref->{list}};

......不过应该完成这项工作。从列表上下文中的 grep 返回，但不要分配除第一个以外的任何值。