my $var = "hogehoge123"; $var =~ s/hoge/fuga/g; このようにPerlの一般的な置換を行うと変数そのものを置換する。 しかし、置換後の結果を別変数に格納したい場合もある。 その場合は以下のように記述する (my $tmp_var = $var) =~ s/hoge/fuga/g;