grep -r should not sort directory entries

* A directory might have 1000s of entries and sorting would make grep -r slower (there is no standard option to toggle sort behaviour)
* Be consistent with OpenBSD and GNU versions by processing directory entries in the order they appear
* As part of verification, I compared output of grep -r on OpenBSD (filenames not sorted) with output of "ls -1a" (filenames sorted)
* Clarification: list-list is only for setting up argument list for recursive matchfile() call. Declare it within if-block scope to avoid potential of old entries appearing between loop iterations.

Author: mknos

bin/grep

@@ -58,7 +58,7 @@ use constant EX_MATCHED => 0;
 use constant EX_NOMATCH => 1;
 use constant EX_FAILURE => 2;
 
-our $VERSION = '1.018';
+our $VERSION = '1.019';
 
 $| = 1;                   # autoflush output
 
@@ -367,7 +367,7 @@ sub matchfile {
 	$opt     = shift;    # reference to option hash
 	$matcher = shift;    # reference to matching sub
 
-	my ( $file, @list, $total, $name );
+	my ( $file, $total, $name );
 	local ($_);
 	$total = 0;
 
@@ -397,13 +397,12 @@ FILE: while ( defined( $file = shift(@_) ) ) {
 					}
 				next FILE;
 				}
-			@list = ();
+			my @list;
 			for (readdir $dh) {
 				next if $_ eq '.' or $_ eq '..';
 				push @list, File::Spec->catfile($file, $_);
 				}
 			closedir $dh;
-			@list = sort @list;
 			matchfile( $opt, $matcher, @list );    # process files
 			next FILE;
 			}