Perl - 如何将更改写入文件而不是仅查看控制台输出

Question

我在SO上发现了这个命令，这正是我想知道但我只看到控制台输出。我需要命令来重写它正在处理的文件（file.txt）。此命令获取大于400的文件中的每个数字（井，正整数）并向其添加13。

perl -pe 's/\d+/$& > 400 ? $&+13 : $&/ge' file.txt

Answer 1

为就地编辑添加选项-i：

perl -i -pe 's/\d+/$& > 400 ? $&+13 : $&/ge' file.txt