Perl：遍历文件并替换

Question

我只是想读一个日志文件，进行搜索和替换，然后写出对同一个日志文件的更改。

在Perl中执行此操作的最佳做​​法是什么？

Answer 1

我通常为此编写一个代码：

perl -i -pe 's/some/thing/' log.file

请参阅Here

Answer 2

通常使用单行代码来完成：

perl -pi.bak -e "s/find/replace/g" <file>

请注意-i.bak部分 - 这会创建一个扩展名为.bak的备份文件。如果您想在没有网络的情况下进行游戏，可以在没有备份的情况下覆盖现有文件：

perl -pi -e "s/find/replace/g" <file>

Answer 3

或者你可以使用sed（我知道......你问过perl）：

sed -i 's/find/replace/g' <file>