file - 如何在 Common Lisp 中进行批量文件编辑？

Question

我想知道如何在 common lisp 中批量编辑文件。我不久前需要这个并使用 perl 和 bash。出于好奇，我想知道 common-lisp 解决方案。

我使用了以下内容:

find -name '*.lisp' -execdir perl -0777 -pi.bak -e 's/foo/bar/mi' '{}' '+'

它的作用就像一个魅力。

上面的命令将目录(及其子目录)中的所有文件输入到 perl 程序中。 Perl 程序搜索正则表达式“foo”并将其替换为正则表达式“bar”，然后将新的(已编辑的)文件保存到位。

感谢您提供有关 CL 解决方案的任何指导。

Answer 1

从 walk-directory 开始怎么样？ , slurp file , close the file , replace foo 和 bar，写回内容，然后......休息。 ;-)