我的设置：perl 5.20.2
echo abc > test.txt perl -i -ne 's/b/x/;print' test.txt
但是在这里,输出被打印到stdout并且文件被清空.为什么？
echo abc > test.txt
perl -i -ne 's/b/x/;push@a,$_;END{print for @a}' test.txt
解决方法
END块不是-i -n魔法的一部分.
-n包含一个隐含的while(<>)围绕(大部分)你的代码,-i导致由<>处理的文件被覆盖.
但是,如in the docs所述,BEGIN和END块存在于隐式循环之外,并且不受-i的影响.什么都没有导致你的打印到stdout任何地方.