如何给文件改名?

[Kent以东首帅哥]

有几百个文件,文件名为(ebook)shakespear.zip, (ebook)zens.zip,等等.
想要把前面的"(ebook)"去掉.

 

[FallenAmber]

用批量改名工具。。。很多软件都可以的比如批量更名专家等等，
最简单的就是用acdsee，totalcommander，一般人都有拉，这样你就不用额外装个软件就为了改文件名了

 

[Kent以东首帅哥]

那些工具虽然很多,但好象没有"ren ebook*.zip *.zip"这样的功能,DOS也不行.

 

[GreenGable]

ftp all the files to a UNIX box and change name there...?

 

[StillBest.com]

重命名的时候记住不要把扩展名也改了，要不然就麻烦了。

 

[无业游民]

靓哥，你的ebook能不能分享一点给俺？或者告诉俺在那里下的？作为交换俺给你写五六行字自动搜索子目录让你达到目的

 

[Kent以东首帅哥]

在edonkey上search "*.pdf,*.txt,*.htm,*.doc,ebook,e-book",大概有一万多个,然后全加到下载表里.

 

[苦逼热狗]

try try
ren (ebook)*.zip *.zip

 

[Kent以东首帅哥]

最初由 BloodHound 发布
try try
ren (ebook)*.zip *.zip

城里人写的那些程序是能省就省,不行.

 

[苦逼热狗]

我说的是DOS，实在不行，自己写个perl小代码，走一遍就解决了

 

[StillBest.com]

最初由 BloodHound 发布
我说的是DOS，实在不行，自己写个perl小代码，走一遍就解决了

要是不会用dos,小代码就更不会写了。

 

[无业游民]

最初由 Kent以东首帅哥 发布
在edonkey上search "*.pdf,*.txt,*.htm,*.doc,ebook,e-book",大概有一万多个,然后全加到下载表里.

俺就是不喜欢edonkey这类东西，俺还以为有什么地方可以下载呢。不管怎样俺不能食盐。就用bloodhound的方案吧（谢谢bloodhound）:

#!/usr/bin/perl -w
use File::Find;
die "Usage: Perl <dir> <removepart> " if @ARGV<2;
($mydir,$remove) = @ARGV;
find(\&wanted, $mydir);
sub wanted {
my $file = $File::Find::name;
return unless $file =~ /$remove/;
my $newfile = $file;
$newfile =~ s/$remove//;
rename ($file, $newfile);
}
用法：打perl mydirectory ebook, 你在mydirectory底下所有子目录里的ebookshakespear.zip, ebookzen.zip都会变成shakespear.zip,zen.zip。现在我们扯平了。不过俺跟大熊猫还没扯平，俺在等他呢

 

[Kent以东首帅哥]

DOS是不行的,那年头比现在还扣


H:\TEMP\Z\T>dir
Volume in drive H is CrystalSun
Volume Serial Number is 9CFF-3A1D

Directory of H:\TEMP\Z\T

2003-09-13 17:06 <DIR> .
2003-09-13 17:06 <DIR> ..
2003-09-10 23:13 578 ebook2.txt
2003-09-10 23:13 578 ebook2a.txt
2003-09-10 23:13 578 ebook2ab.txt
3 File(s) 1,734 bytes
2 Dir(s) 177,646,592 bytes free

H:\TEMP\Z\T>ren ebook*.txt *.txt

H:\TEMP\Z\T>dir
Volume in drive H is CrystalSun
Volume Serial Number is 9CFF-3A1D

Directory of H:\TEMP\Z\T

2003-09-13 17:06 <DIR> .
2003-09-13 17:06 <DIR> ..
2003-09-10 23:13 578 ebook2.txt
2003-09-10 23:13 578 ebook2a.txt
2003-09-10 23:13 578 ebook2ab.txt
3 File(s) 1,734 bytes
2 Dir(s) 177,646,592 bytes free