Subject: | taint.t fails for PERL5LIB paths contaning spaces |
The taint.t test script iterates over each path in PERL5LIB, but does
not make allowances for those paths containing spaces.
This fixes it:
--- taint.t.dist 2009-05-03 14:36:37.000000000 -0700
+++ taint.t 2009-05-03 14:36:37.000000000 -0700
@@ -19,7 +19,7 @@
$^X,
'-Tw',
(
- map { "-I$_" }
+ map { qq{-I"$_" }}
grep { -d $_ } # bleh, code-refs getting stringified
split(/$Config{path_sep}/, $perl5lib)
),