如何在perl6中找到regexp的匹配数?

前端之家收集整理的这篇文章主要介绍了如何在perl6中找到regexp的匹配数?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
在Perl 5中我们可以写
my @things = $text =~ /thing/g;

标量上下文中的$thing是字符串$text中子字符串事件的非重叠出现次数.

在Perl 6中如何做到这一点?

解决方法

你可以这样做:
my $text = 'thingthingthing'
my @things = $text ~~ m:g/thing/;
say +@things; # 3

~~左侧与右侧匹配,m:g使测试返回包含所有结果的List [Match].

原文链接:https://www.f2er.com/Perl/172038.html

猜你在找的Perl相关文章