$text =~ m/regex/mods;
m/.../
m/.../g
m/.../gc
$text =~ s/regex/replacement/mods;
置換被演算子をPerlコードとして評価します。
$text =~ s/regex/replacement/e;