Perl一行代碼找到並替換一個變量文件

Question

我試圖找到<li ><a href='xxxxxxxx'>some_link</a></li>並將其替換爲空。爲此，我正在運行下面的命令，但它將$識別爲正則表達式的一部分。

perl -p -i -e 's/<li ><a href=.*$SOMEVAR.*li>\n//g' file.html

我試過下面的東西，
${SOMEVAR}
\$SOMEVAR
FIND="<li ><a href=.*$SOMEVAR.*li>"; perl -p -i -e 's/$FIND//g' file.html

任何想法？謝謝。

Answer 1

Bash只用雙引號進行變量替換。

這應該工作：

perl -p -i -e "s/<li ><a href=.*?$SOMEVAR.*?li>\n//g" file.html 

編輯其實，這可能會在那裏行事怪異與\n。另一種方法是利用Bash的字符串連接。這應該工作：

perl -p -i -e 's/<li ><a href=.*?'$SOMEVAR'.*?li>\n//g' file.html 

編輯2：我只是把你正在試圖做什麼定睛一看，這是一種危險的。您正在使用的greedy表單，這可能會比您想要的文字更多。改爲使用.*?。我更新了上述正則表達式。

Answer 2

如果「SOMEVAR」確實是一個外部變量，你可以將它導出到環境中，因此引用它：

SOMEVAR=whatever perl -p -i -e 's/<li ><a href=.*$ENV{SOMEVAR}.*li>\n//g' file.html