我很沮丧.好的,所以这可能是我见过的最有趣的 Perl bug.即使在今天,我也在学习关于Perl的新内容.从本质上讲,触发器操作符..返回假,直到左手侧返回真,然后真,直到右手侧返回假保持全局状态(或者说是我承担.)

我可以重置它(也许这对Perl 4-esque几乎没有使用过是一个很好的补充reset())？或者,没有办法安全地使用此操作员？

我也没有看到这个(全局上下文位)记录在哪里perldoc perlop这是一个错误？

码

use feature ':5.10';
use strict;
use warnings;

sub search {
    my $arr = shift;
    grep { !( /start/ .. /never_exist/ ) } @$arr;
}

my @foo = qw/foo bar start baz end quz quz/;
my @bar = qw/foo bar start baz end quz quz/;

say 'first shot - foo';
say for search \@foo;

say 'second shot …