逃离变量内的美元符号

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;