前端之家收集整理的这篇文章主要介绍了
数组 – 是否有一个Perl快捷方式来计算字符串中的匹配数？，
前端之家小编觉得挺不错的，现在分享给大家，也给大家做个参考。
假设我有：
my $string = "one.two.three.four";
我应该如何玩上下文得到模式找到匹配的次数(3)？这可以使用单行吗？
我试过这个：
my ($number) = scalar($string=~/\./gi);
我想通过把括号放在$数字周围，我会强制数组上下文，通过使用标量，我会得到计数。但是，我得到的是1。
这将正则表达式本身放在标量上下文中，这不是你想要的。相反，把正则表达式在列表上下文(以获得匹配的
数量)，并把它放入标量上下文。
my $number = () = $string =~ /\./gi;
原文链接：https://www.f2er.com/Perl/173532.html
