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

perl regex find and replace with variable from bash

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

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

我不太确定你的意思,但我想你想要这样的东西,其中 () 括号存储数字,</code> 替换它。</p> <pre><code>perl -pi -w -e 's/src="(\d+)/src="http:\/\/website.com\//g’ file.tsv

并且您可以通过为 s/// 操作选择不同的分隔符来避免所谓的“倾斜牙签综合症”,例如 s{}{}

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