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

发布时间：2020-12-14 05:39:24 所属栏目：百科来源：网络整理

导读：当它固定在字符串的前面时,为什么这个后置断言不起作用？运行以下代码,您将看到第一个测试通过,但第二个测试仅通过^锚点变化,但失败了. use Test::More tests = 2;my $s = '/123/456/hello'; $s =~ s{(?=/)d+(?=/d+/hello)}{0}; # unanchoredis($s,'/0/456

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

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上进行了测试.

解决方法

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!