perl正则表达式里的变量替换

perl正则表达式里的变量替换
perl正则表达式里的变量替换

语法比较特别,难记
帖之,备忘:
perl code:

my $str1 = '123abc123';
my $str2 = 'str2';
print "\n\n$str1";
$str1 =~ s/abc/${str2}/gsi;
print "\n\n$str1";

output:
123str2123

应该能看懂吧.

回头多看,多记,少忘