搜索并替换文件中的多个数字

时间:2014-04-11 19:11:50

标签: perl

我正在尝试使用Perl 5.10.1进行内联搜索和替换文件

当我搜索73.10这样的数字并用73.20替换它时。它找到73100.25并将其替换为73.200.25和73.10替换为73.20。

该文件有6列,如下所示:

文本文本文本73100.25 25.12文本

文本文本文本365.8 96.25文本

text text text 23189.73 73.10 text

我如何确保它不会替换错误的数字?

`/usr/bin/perl -p -i -e "s/$num1/$num3/g" new_info.txt`;
`/usr/bin/perl -p -i -e "s/$num2/$num4/g" new_info.txt`;

1 个答案:

答案 0 :(得分:1)

perl -i -pe 's/\Q$num1\E/$num3/g' new_info.txt