Hi All,
I am needing to perform some work on files located in a directory. I am reading
the contents of the directory in and but need to filter what's read in. So far
I can filter out the "." and ".." but I need to add two more cases. I need to
make sure none of the entries in the array are directories or files with
extensions.
Here is what I have:
opendir DIR, $InDir or die "cannot open dir $InDir: $!";
my @files = grep { $_ ne '.' && $_ ne '..' } readdir(DIR);
closedir(DIR);
foreach(@files){
print $_,"\n";
}
Can anyone point me to a possible approach?
Thanks!
jlc
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
