in reply to File searching *
To print the non-log files which are not directories within $dh4, something like this could work...
When using readdir(), remember that the names that you get are simple names from that directory and that in order to do a file test on them you have to prepend the directory name.
What is $entry5 and what does it have to do with anything?opendir my $dh4, $a_directory or die "can't open directory $dh4:$!"; while (my $this_file = readdir $dh4) { next if ($this_file =~ /\.log$/); #skip all log files next if (-d "$dh4/$this_file"); #skip all directories print "$this_file is an extra file: $dh4/$this_file\n"; }
|
|---|