xuantl wrote:
Hi all,
Hello,
I wan't to change name of all the files in a directory(incluing sub
directorys) to lowercase.
the code:
---
use File::Find;
$rootDir='.';
find (\&lowerCase, $rootDir);
find (sub{print "$File::Find::name\n"}, $rootDir);
sub lowerCa
On Sat, 19 Feb 2005 16:40:43 +0800, xuantl <[EMAIL PROTECTED]> wrote:
Hi all,
Hi
I wan't to change name of all the files in a directory(incluing sub
directorys) to lowercase.
[snip]
But it only works for files in the top directory("."), and no effect to
all other files in sub directorys. Any help?
Hi all,
I wan't to change name of all the files in a directory(incluing sub
directorys) to lowercase.
the code:
---
use File::Find;
$rootDir='.';
find (\&lowerCase, $rootDir);
find (sub{print "$File::Find::name\n"}, $rootDir);
sub lowerCase {
$oldN