Tag: perl4

有一个Perl快捷方式来计算一个string中匹配的数量吗？

假设我有： my $string = "one.two.three.four"; 我应该如何玩上下文来获得模式匹配次数（3）？ 这可以用一个class轮完成吗？ 我试过这个： my ($number) = scalar($string=~/\./gi); 我认为，通过在$number周围放置括号，我会强制数组上下文，并通过使用scalar ，我会得到计数。 但是，我得到的是1 。