|
发表于 2004-7-20 23:31:51
|
显示全部楼层
用正则表达式一个命令就可以解决了,可惜我水平差,不会...
那就暂时先写个脚本来代替罢,反正也能用:
[code:1]
#!/usr/bin/perl
#Rename the HTML file to html
@files=`ls -1 $ARGV[0]`;
foreach $file(@files){
$leng=length($file)-1;
$file=substr($file,0,$leng);
$file_type=substr($file,$leng-4,$leng);
$file2=substr($file,0,$leng-4);
$file2=sprintf("%shtml",$file2);
if($file_type eq "HTML"){
printf("mv $file $file2\n");
rename($file,$file2);
}
}
[/code:1]
例如将些文件保存名为2html.pl,赋予运行权限:chmod u+x 2html.pl,然后运行./2html.pl 文件夹名,如果省略参数则对当前文件夹操作。 |
|