copy
#!/usr/bin/perl -w
#########################################################################
# File Name: change.pl
# Author: xuehuikuaile
#########################################################################
#$^I变量非空，这个字符就会成为备份文件的扩展名
#修改原文件的同时 会生成备份文件
$^I = ".bak";
while(<>){
s/testxxx/testaaa/gm;
print;
}
运行方法： ./change.pl *.dat
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
