Although it might be more elegant to do a find on the folders, for my purposes I'd actually just like to hard code the folders into the script (at present there are only 4 separate folders to scan), and just use the basic functionality of this script as it stands.
I thought that adding more
chdir 'C:/devl/bin/timedir' or die "Arghh!!! $!";
statements with the paths of each folder within it would do it, but I realized I was just chdir'ing into those directories and wasn't doing anything inside any of them (except of course for the last one in the list).
Maybe I should create some kind of loop that will just do a single folder at a time, but I'm not sure my skill level will allow me to pull that off.
Anyway, if I missed something about File::Find that I should know about, please give me a hint.
Thanks,
Dave | [reply]
[d/l] |
foreach my $dir ( @directories ) {
chdir $dir;
opendir( ... # your code goes here.
}
Sören | [reply]
[d/l] |