[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Unix-ify File Names



Or, in Perl (might as well):

#!/usr/bin/perl -w

use strict;

opendir(DIR, system('pwd'));
my @files = readdir(DIR);
closedir(DIR);

my $new_name;

foreach (@files)
{
 $new_name = lc($_);
 $new_name =~ s/\ /\-/g;
 system('mv -i $_ $new_name');
}



Reply to: