Memoize

regex

# perl
 
# これはうまくいかない
$str =~ m/[_-a-zA-Z0-9]+/;
 
# こうしたらうまくいった
$str =~ m/[a-zA-Z0-9_-]+/;

あーわかった。

最初の例は _-a でひとつの文字クラスとして解釈されちゃうのか。

ということはこれでもうまくいく。

$str =~ m/[-_a-zA-Z0-9]+/;