- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Thu, 19 Feb 2009 20:21:13 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv4698/bin
Modified Files:
checklink
Log Message:
Use PERL5LIB from environment even in taint mode, thanks to people on cpan-testers-discuss for assistance.
Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.148
retrieving revision 4.149
diff -u -d -r4.148 -r4.149
--- checklink 19 Feb 2009 19:59:12 -0000 4.148
+++ checklink 19 Feb 2009 20:21:11 -0000 4.149
@@ -29,6 +29,15 @@
delete(@ENV{qw(IFS CDPATH ENV BASH_ENV)});
$ENV{PATH} = ''; # undef would output warnings with Perl 5.6.1's Cwd.pm.
+# ...but we want PERL5LIB honored even in taint mode, see perlsec, perl5lib,
+# http://www.mail-archive.com/cpan-testers-discuss%40perl.org/msg01064.html
+BEGIN {
+ # undefinedness and "v-string in use/require non-portable" warnings with
+ # perl5lib 1.02 and perl 5.10.0, rt.cpan.org #43443, #43446
+ local $^W = 0;
+ require perl5lib;
+}
+
# -----------------------------------------------------------------------------
package W3C::UserAgent;
Received on Thursday, 19 February 2009 20:21:21 UTC