运用
perl -pi -e 's/pattern/replacement/g' $(find src -type f)
很好,除了一件事:所有文件都被覆盖,即使没有任何匹配.这并不好,因为我经常在Emacs或Eclipse中打开它们,然后问我无聊的问题.有一种简单的方法可以防止触摸未更改的文件(在查找中使用grep的东西太多了,特别是对于复杂的模式).
perl file
file ×1
perl ×1