This is from 'Perl Cookbook':
use File::Find;
sub process_file {
# do whatever;
}
find (\&process_file, @DIRLIST);
Sandeep
-----Original Message-----
From: Amarnath Honnavalli Anantharamaiah
[mailto:[EMAIL PROTECTED]]
Sent: 10 May 2001 13:11
To: Perl
Subject: RE: Traversing a directory tree
I tried using the File::Find, but I could not trace out the usage properly.
Amar
-----Original Message-----
From: Amarnath Honnavalli Anantharamaiah
[mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 10, 2001 4:38 PM
To: Perl
Subject: Traversing a directory tree
Ho do I traverse the directory tree and find the file present in it.
I mean I should have an output similar to find command in shell.
e.g find . -name lock -print
Thanks in advance
Amar