文字/パターンが幾つあるか数える
my $count = () = "bbbababbbaaaa" =~ /(ab)/g; # => 2
少し悩んで、こんな風に書いてみたら上手くいったので載せておきます。空の括弧のお陰で一時変数を使わないで済むのがポイント。
これって良く使われる方法でしょうか。もっと上手い方法がありましたらぜひ教えて下さい。
my $count = () = "bbbababbbaaaa" =~ /(ab)/g; # => 2
少し悩んで、こんな風に書いてみたら上手くいったので載せておきます。空の括弧のお陰で一時変数を使わないで済むのがポイント。
これって良く使われる方法でしょうか。もっと上手い方法がありましたらぜひ教えて下さい。