Perl正則表達式從bash中查找並替換為變量

Question

我有這個正則表達式： 'src=\\d' ，它匹配以文件中的數字開頭的所有src屬性。 我需要將其存儲在變量中，切出src=並從那里寫一個新的$string並將其\\d連接到它： $string . $d $string . $d 。 是否可以通過單個命令行僅將\\d存儲在變量中？ 如何在Perl的命令行中使用cut和variable？ 可能嗎？

perl -pi -w -e 's/src="\d+/src="http:\/\/website.com\/\d+/g’ file.tsv 

Answer 1

我不確定您的意思，但我想您需要這樣的內容，其中()括號用於存儲數字，而$1會將數字替換回去。

perl -pi -w -e 's/src="(\d+)/src="http:\/\/website.com\/$1/g’ file.tsv

您可以通過為s///操作選擇不同的分隔符（例如s{}{}來避免所謂的“傾斜牙簽綜合症”

perl -pi -w -e 's{src="(\d+)}{src="http://website.com/$1}g’ file.tsv