除非我使用备份扩展名指定Perl单行，否则我无法在ActivePerl下运行Perl单行编辑工作：
C:\> perl -i -ape "splice (@F, 2, 0, q(inserted text)); $_ = qq(@F\n);" file1.txt
Can't do inplace edit without backup.
使用-i.bak或-i.orig的相同命令可以处理，但会在此过程中创建不需要的备份文件。
有解决方法吗？
答案 0 :(得分：32)
这是Windows / MS-DOS限制。根据{{3}}：
如果您尝试从已删除（但仍然打开）的文件中读取，那么您在MS-DOS等系统上会感到困惑。你必须说-i.bak，或者其他一些。
Perl的-i实现使其在保持打开句柄的同时删除file1.txt，然后重新创建具有相同名称的文件。这允许您“读取”file1.txt，即使它已被删除并正在重新创建。不幸的是，Windows / MS-DOS不允许您删除附加了打开句柄的文件，因此这种机制不起作用。
最好的方法是使用-i.bak，然后删除备份文件。这至少为您提供了一些保护 - 例如，如果perl以非零退出代码退出，您可以选择不删除备份。类似的东西：
perl -i.bak -ape "splice...." file1.txt && del file1.bak
答案 1 :(得分：0)
带有递归修改和删除的示例都由find完成。适用于例如mingw git bash on windows。
$ find . -name "*.xml" -print0 | xargs -0 perl -p -i.bak -e 's#\s*<property name="blah" value="false" />\s*##g'
$ find . -name "*.bak" -print0 | xargs -0 rm
在find / xargs之间传递二进制终止值以处理空格。不寻常的s /前缀，以避免在搜索词中修改xml。这假设您没有任何.bak个文件可以开始。