# Test output files for age to see if they should be processed # Start out assuming all output files may be parsed my $filesAreOldEnough = 1; if ( $numOutputFiles > 0 ) { foreach my $fileName ( @outputFiles ) { my $fileAge = -M $fileName; print "Filename=[ $fileName ] file age = [ $fileAge ]\n"; if ( $fileAge < 1 ) { $filesAreOldEnough = 0; #last; # check all files for now } } } else { # No input files to process, skip directory... $filesAreOldEnough = 0; }