perl - 変数内のドル記号をエスケープする

Question

私はPerlの簡単な行を持っています

s/$var/'string'/g

問題は、 $var に のような文字列が含まれていることjkdlsf$lkjlです。真ん中のドル記号に注意してください。このドル記号が原因で、置換が機能していないようです。変数内にある場合、これをエスケープするにはどうすればよいですか?

Answer 1

\Q引用を使用してください：

s/\Q$var/'string'/g

Answer 2

quotemetaまたは\Qおよび\E埋め込まれた正規表現構造を使用します。

s/\Q$var\E/'string'/g;

# or

my $var = quotemeta 'jkdlsf$lkjl';
s/$var/'string'/g;