Charles and Jenda, thanks for your responses. In addition to the change that
you both suggested, I had a problem with the array variable @directory in my
exists test. I was testing the entire array instead of just the current
cell. Charles, thanks for your suggestion on opendir, I will look into it.
Terry Poperszky
chomp (@directory = `dir /b /O-D`);
open MYFILE, "<dir_log" or die "Log File Missing";
while (<MYFILE>) {
chomp (); $dir_log{$_} = 1;
}
foreach (@directory) {
print $_ if (exists $dir_log{$_});
}
