在文本处理时经常会碰到这样的情况:有一批文件需要修改里面的内容,但是又希望保留原来文件的内容。这个时候Perl提供了一个很方便的变量$^I,将需要备份文件的后缀保存在该变量后,我们在修改文件内容时,Perl会:
s/abc/dfg/g;
print;
例如下面一段程序,我要将所有.dat文本中的abc改为dfg,并备份成.bak的文件
#!/usr/bin/perl -w
use strict;
$^I=".bak";
while(<>) {
}
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。