我只是想读入一个日志文件,进行搜索和替换,然后将更改写出到同一个日志文件中。
在 Perl 中执行此操作的最佳实践方式是什么?
这通常使用单线完成:
perl -pi.bak -e "s/find/replace/g" <file>
请注意该-i.bak
部分 - 这将创建一个扩展名为.bak
. 如果您想在没有网络的情况下玩,您可以这样做以覆盖现有文件而不进行备份:
perl -pi -e "s/find/replace/g" <file>
或者你可以使用sed
(我知道......你问过perl):
sed -i 's/find/replace/g' <file>