quot;Usage: rename perlexpr [filenames]\n";
if ([EMAIL PROTECTED]) {
@ARGV = ;
chomp(@ARGV);
}
foreach $_ (@ARGV) {
$old_name = $_;
eval $regexp;
die $@ if $@;
rename($old_name, $_) unless $old_name eq $_;
print("$old_name\t");
print("$_\n");
ue, 2003-08-05 at 09:37, Jeff 'japhy' Pinyan wrote:
> On Aug 5, David Smith said:
>
> > I have a couple of problems. I have multiple files on a server that are
> >all audio files. Some are mp3, some are waves. I need to change there
> >names because of a new autom
