glob-basic.t, runenv.t fix-ups

Message-Id: <5.0.2.1.0.20010219230450.02762648@exchi01>

Case-forgiving systems match TestInit.pm with TES*.

p4raw-id: //depot/perl@8849

diff --git a/t/lib/glob-basic.t b/t/lib/glob-basic.t
index 8cc072a..5094ff6 100755 (executable)
--- a/t/lib/glob-basic.t
+++ b/t/lib/glob-basic.t
@@ -103,8 +103,8 @@ print "ok 7\n";
 );
 
 # Working on t/TEST often causes this test to fail because it sees temp
-# and RCS files.  Filter them out.
-@a = grep !/(,v$|~$)/, @a;
+# and RCS files.  Filter them out, and .pm files too.
+@a = grep !/(,v$|~$|\.pm$)/, @a;
 
 unless (@a == 3
         and $a[0] eq ($^O eq 'VMS'? 'test.' : 'TEST')