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