W3C home > Mailing lists > Public > www-validator-cvs@w3.org > February 2009

perl/modules/W3C/LinkChecker/bin checklink,4.148,4.149

From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
Date: Thu, 19 Feb 2009 20:21:13 +0000
To: www-validator-cvs@w3.org
Message-Id: <E1LaFOT-0001En-EY@lionel-hutz.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 GMT

This archive was generated by hypermail 2.2.0+W3C-0.50 : Thursday, 26 April 2012 12:55:08 GMT