我正在寻找关于Perl的grep函数如何工作的一些细节.我这样做：
if ( grep{ $foo == $_ } @bar ) {
some code;
}
假设@bar很大(数十万个元素).根据我的数据,如果我对@bar进行排序,$foo的值更可能出现在数组的开头附近而不是接近结尾.我想知道这是否有助于提高性能.
换句话说,使用上面的代码,grep是否按顺序通过@bar检查是否$foo == $_然后在发现任何值为真后立即退出？或者它会在返回值之前检查@bar的每个元素吗？
解决方法
grep不会短路,因此元素的排序无关紧要.
当List :: MoreUtils首次发生短路时,整个列表必须在调用之前放在堆栈上.
这将是最好的：
for (@bar) {
if ($foo == $_) {
some code;
last;
}
}
更新：我最初迭代索引,因为它使用O(1)内存,但(@bar)也是如此(与一般的(LIST)相反),因为ysth提醒我.