regex - 文字列内の単語の総出現回数を知り、perl でデータを取得する方法は?

Question

私はこのような文字列を持っています

$myString = "Itwas%AC%4D%AC%4A%5BL3%BF5,T3,S13%4A%5Bbound over%AC%4A%5BC6%4A%5B%5D%AC%4A%5BL7%BF11%4A%5Ball good people to come"

私の要件は、%4A%5B の出現回数を数え、2 つの %4A%5B の間のデータを取得して配列に格納することです。

例：

1)L3%BF5,T3,S13
2)C6
3)L7%BF11

上記の文字列では、それが 6 回出現しています。したがって、実行時にそれを知り、%4A%5B の間のデータをフェッチして配列に格納したいと考えています。

Answer 1

次のように正規表現の一致をカウントすることもできます。

my @matches = $myString =~ /%4A%5B/g;
print scalar(@matches)