正则表达式 – 为什么这个正面的后置断言在锚定到字符串的开头时不起作用？

当它固定在字符串的前面时,为什么这个后置断言不起作用？运行以下代码,您将看到第一个测试通过,但第二个测试仅通过^锚点变化,但失败了.

use Test::More tests => 2;

my $s = '/123/456/hello';    
$s =~ s{(?<=/)\d+(?=/\d+/hello)}{0};  # unanchored
is($s,'/0/456/hello','unanchored'); # passes

$s = '/123/456/hello';
$s =~ s{^(?<=/)\d+(?=/\d+/hello)}{0}; # anchored
is($s,'anchored');   # fails

将^移入后视断言对我来说不是一个选项(这是一个极其简化的例子),但确实解决了这个问题.我找到了另一种方法来做我想要的,但我很好奇为什么这种方法不起作用.我在perl 5.8.8和perl 5.10.0上进行了测试.

解决方法

请记住,断言是零宽度,不会消耗它匹配的字符.所以锚必须进入断言,否则整个表达式不匹配.