regex - 计算正则表达式通配符匹配的字符串中特定字符的匹配次数

Question

我可以对正则表达式本身中匹配的每个不同字符进行计数吗？

假设正则表达式看起来像 />(.*)[^a]+/

我可以计算组 (.*) 捕获的字符串中的字母 p 的出现次数吗？

Answer 1

您必须捕获匹配的字符串并单独处理它。

这段代码演示

use strict;
use warnings;

my $str = '> plantagenetgoosewagonattributes';

if ($str =~ />(.*)[^a]+/) {
  my $substr = $1;
  my %counts;
  $counts{$_}++ for $substr =~ /./g;
  print "'$_' - $counts{$_}\n" for sort keys %counts;
}

输出

' ' - 1
'a' - 4
'b' - 1
'e' - 4
'g' - 3
'i' - 1
'l' - 1
'n' - 3
'o' - 3
'p' - 1
'r' - 1
's' - 1
't' - 5
'u' - 1
'w' - 1