gオプションをつけておけばposという組み込み関数が使える
pirl @> $text = "abcde"
"abcde"
pirl @> pos($text) if $text =~ /c/
undef
pirl @> pos($text) if $text =~ /c/g
3
といまさらながら知った。
gオプションをつけておけばposという組み込み関数が使える
pirl @> $text = "abcde"
"abcde"
pirl @> pos($text) if $text =~ /c/
undef
pirl @> pos($text) if $text =~ /c/g
3
といまさらながら知った。