regex - perl 正则表达式查找并替换为 bash 中的变量

Question

我有这个正则表达式:'src=\d' 它匹配文件中以数字开头的所有 src 属性。我需要将它存储在一个变量中，将 src= 剪掉并从那里写入一个新的 $string 并将 \d 连接到它:$字符串。 $d。是否可以使用单个命令行仅将 \d 存储在变量中？如何使用 perl 在命令行中使用 cut 和变量？可能吗？

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