Avoid glob in t/TEST on non-Windows

See ticket #123561.  The presence of ‘glob’ was causing perl to
attempt to File::Glob at compile time, before @INC is set up.

Windows needs to do file globbing on @ARGV for t/TEST to work cor-
rectly.  Windows only uses TEST for miniperl (it uses harness for
‘make test’), and under miniperl ‘glob’ doesn’t use File::Glob.  So it
is safe to use ‘glob’ on Windows.  For the sake of other systems, we
can put it in a string eval to avoid even compiling the op.

1 files changed, 1 insertions, 1 deletions

diff --git a/t/TEST b/t/TEST
index 4333eed04e..480ce17734 100755
--- a/t/TEST
+++ b/t/TEST
@@ -124,7 +124,7 @@ $| = 1;
 # remove empty elements due to insertion of empty symbols via "''p1'" syntax
 @ARGV = grep($_,@ARGV) if $^O eq 'VMS';
 
-@ARGV = map glob, @ARGV if $^O eq 'MSWin32';
+@ARGV = eval 'map glob, @ARGV' if $^O eq 'MSWin32';
 
 our $show_elapsed_time = $ENV{HARNESS_TIMER} || 0;