在Perl中組合變量和正則表達式

Question

我有代碼：

$TEMP =~ s/\#NAME\#/$customerName/g;

我使用Regex在$customername的值替換#NAME#的地方。 我要做的是將一個變量附加到NAME的末尾。

所以我想做類似的事情：

$TEMP =~ s/\#NAME . $appendValue\#/$customerName/g;

因此基本上是：

$TEMP =~ s/\#NAME_1\#/$customerName/g;

這項工作還是有適當的方法來處理呢？

---

測試用例：

• 您好＃NAME＃
• 這僅適用於＃NAME＃

Answer 1

該模式對變量進行插值，因此不需要串聯運算符：

$TEMP =~ s/#NAME$appendValue#/$customerName/g;

但是，您可能需要保護變量中的特殊字符，因此請使用\\Q...\\E ：

$TEMP =~ s/#NAME\Q$appendValue\E#/$customerName/g;

#在正則表達式中不是特殊的，因此不需要反斜杠（但不會造成傷害）。