Perl:如何在分组变量后插入数字?

时间:2011-12-21 15:54:31

标签: regex perl

  

可能重复:
  Perl: How do you insert numbers after grouping variable?

我有以下perl one liner:

perl -pi.bak -e 's/(.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t)/$123424977\t/g if $. <= 200'

问题是我想在分组的正则表达式(.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t)之后插入数字23424977。

但是Perl认为我指的是$ 123424977组,并且不承认我的意思是1美元而且23424977是我之后想要插入的数字。我怎么能纠正这个?

1 个答案:

答案 0 :(得分:4)

简单地引用带有大括号的$ 1捕获组:${1}

perl -pi.bak -e 's/(.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t.*?\t)/${1}23424977\t/g if $. <= 200'