1. 需求
有N个 *.dat的文件,其中都有一处拼写错误,testxxx --> testaaa
#!/usr/bin/perl -w
#########################################################################
# File Name: change.pl
# Author: kevin xiang
# Created Time: 2014年07月08日 星期二 14时35分28秒
#########################################################################
#$^I变量非空,这个字符就会成为备份文件的扩展名
#修改原文件的同时 会生成备份文件
$^I = ".bak";
while(<>){
s/testxxx/testaaa/gm;
print;
}
运行方法: ./change.pl *.dat