regex – Perl遍历每个匹配

发布时间：2020-12-15 21:23:56 所属栏目：大数据来源：网络整理

导读：让我们说，我扫描一个页面的原始HTML寻找这个正则表达式。 (末尾的引号是故意的)。 m/(https?://.*?(?:'|"))/ 这种模式可能匹配?100次。什么是常见的perl惯用法/一种快速的方法来迭代所有捕获组匹配的列表？解决方法从 perlretut(一个非常精细的教程) wh

让我们说，我扫描一个页面的原始HTML寻找这个正则表达式。 (末尾的引号是故意的)。

m/(https?://.*?(?:'|"))/

这种模式可能匹配?100次。什么是常见的perl惯用法/一种快速的方法来迭代所有捕获组匹配的列表？

解决方法

从 perlretut(一个非常精细的教程)

while ($x =~ /(w+)/g) {
        print "Word is $1,ends at position ",pos $x,"n";
    }

你可以使用while和g修饰符迭代所有匹配，$ 1你获得捕获组1的内容，在这个例子中，你也得到了pos的位置。

（编辑：李大同）

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