Parens的奇怪Perl正则表达式行为
|
我正在添加一些Wikipedia标记，并且想要匹配相对链接（在Wikipedia上）中的URL。我不想匹配任何包含冒号的URL（不计算协议冒号），以避免出现特殊页面等，因此我有以下代码：
while ($body =~ m|<a href=\"(?<url>/wiki/[^:\"]+)|gis) {
my $url = $+{url};
print \"$url\\n\";
}
/wiki/Eon_(geology
/wiki/Eon_
没有找到相关结果
已邀请:
2 个回复
箩冀娥
$body = <<\"__ENDHTML__\"; <a href=\"/wiki/Eon_(geology)\">Body</a> Blah blah <a href=\"/wiki/Some_other_(parenthesis)\">Body</a> __ENDHTML__ while ($body =~ m|<a href=\"(?<url>/wiki/[^:\"]+)|gis) { my $url = $+{url}; print \"$url\\n\"; }芦歉竭皑