如何在正则表达式中使用Perl变量？

Question

我正在尝试搜索并用变量替换。在这种情况下，我从前一场比赛中拉出的变量。这里是我的代码：

$fileContentToAlter =~ s/$2/$1/g; 

现在我在这种状态下实现的，它被错误地解读为$有一个正则表达式的内部它本身的意义。我在网上做了一些搜索，然后阅读双引号可以解决这个问题，因为它会内插，但这看起来并不适合我。我不会说谎，这是一项家庭作业，所以我不期待一个单一的答案。只是在正确的方向推动。

Answer 1

避免'$ 1'和'$ 2'，因为它们是正则表达式元字符。

use strict; 
use warnings; 

my $val1 = "abc"; 
my $val2 = "def"; 
while (<>) 
{ 
    s/$val1/$val2/g; 
    print; 
}