除非我使用备份扩展名指定它们,否则我无法在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.
Run Code Online (Sandbox Code Playgroud)
与处理相同的命令-i.bak或-i.orig处理相同的命令但会在此过程中创建不需要的备份文件.
有没有解决的办法?
rjh*_*rjh 33
这是Windows/MS-DOS限制.根据perldiag:
如果您尝试从已删除(但仍然打开)的文件中读取,那么您在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
Run Code Online (Sandbox Code Playgroud)