Eliminate tests for tainting of globs, skipped since 1999.

Commit 72b166521443a1b8 changed perl to using File::Glob to implement the glob
builtin. Previously glob was implemented by spawning a csh, hence globbing was
not allowed on tainted values. The test for this was skipped, but never removed.

diff --git a/t/op/taint.t b/t/op/taint.t
index 7e82d1e..fc9fc2f 100644 (file)
--- a/t/op/taint.t
+++ b/t/op/taint.t
@@ -17,7 +17,7 @@ use Config;
 use File::Spec::Functions;
 
 BEGIN { require './test.pl'; }
-plan tests => 693;
+plan tests => 691;
 
 $| = 1;
 
@@ -1006,18 +1006,6 @@ SKIP: {
     test tainted $line;
 }
 
-# Globs should be forbidden, except under VMS,
-#   which doesn't spawn an external program.
-SKIP: {
-    skip "globs should be forbidden", 2 if 1 or $Is_VMS;
-
-    my @globs = eval { <*> };
-    test @globs == 0 && $@ =~ /^Insecure dependency/;
-
-    @globs = eval { glob '*' };
-    test @globs == 0 && $@ =~ /^Insecure dependency/;
-}
-
 # Output of commands should be tainted
 {
     my $foo = `$echo abc`;