如何在正则表达式中使用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;
}