link-checker commit: Require Perl >= 5.8.

changeset:   342:c6f199295f1c
user:        ville
date:        Thu Feb 04 19:15:47 2010 +0000
files:       Makefile.PL bin/checklink docs/checklink.html
description:
Require Perl >= 5.8.

Primarily for the previous change, but also because it's very likely that
the code wouldn't work on earlier versions any longer and I suppose there
is very little demand and testing resources available for earlier versions.


diff -r 0dfa6acfa23d -r c6f199295f1c Makefile.PL
--- a/Makefile.PL	Thu Feb 04 19:05:22 2010 +0000
+++ b/Makefile.PL	Thu Feb 04 19:15:47 2010 +0000
@@ -1,4 +1,4 @@
-use 5.00503;
+use 5.008;
 use ExtUtils::MakeMaker;
 
 WriteMakefile(
diff -r 0dfa6acfa23d -r c6f199295f1c bin/checklink
--- a/bin/checklink	Thu Feb 04 19:05:22 2010 +0000
+++ b/bin/checklink	Thu Feb 04 19:15:47 2010 +0000
@@ -5,7 +5,7 @@
 # (c) 1999-2010 World Wide Web Consortium
 # based on Renaud Bruyeron's checklink.pl
 #
-# $Id: checklink,v 4.178 2010-02-04 19:05:22 ville Exp $
+# $Id: checklink,v 4.179 2010-02-04 19:15:47 ville Exp $
 #
 # This program is licensed under the W3C(r) Software License:
 #       http://www.w3.org/Consortium/Legal/copyright-software
@@ -24,10 +24,11 @@
 #       http://lists.w3.org/Archives/Public/www-validator/ (archives)
 
 use strict;
+use 5.008;
 
 # Get rid of potentially unsafe and unneeded environment variables.
 delete(@ENV{qw(IFS CDPATH ENV BASH_ENV)});
-$ENV{PATH} = ''; # undef would output warnings with Perl 5.6.1's Cwd.pm.
+$ENV{PATH} = undef;
 
 # ...but we want PERL5?LIB honored even in taint mode, see perlsec, perl5lib,
 # http://www.mail-archive.com/cpan-testers-discuss%40perl.org/msg01064.html
@@ -283,7 +284,7 @@
   $PROGRAM     = 'W3C-checklink';
   $VERSION     = '4.5';
   $REVISION    = sprintf('version %s (c) 1999-2010 W3C', $VERSION);
-  my ($cvsver) = q$Revision: 4.178 $ =~ /(\d+[\d\.]*\.\d+)/;
+  my ($cvsver) = q$Revision: 4.179 $ =~ /(\d+[\d\.]*\.\d+)/;
   $AGENT       = sprintf('%s/%s [%s] %s',
                          $PROGRAM, $VERSION, $cvsver,
                          (W3C::UserAgent::USE_ROBOT_UA
@@ -1637,10 +1638,7 @@
 sub new
 {
   my $p = HTML::Parser::new(@_, api_version => 3);
-  eval { # ...because utf8_mode is only available with Perl >= 5.8.
-    local $SIG{__DIE__} = undef;
-    $p->utf8_mode(1);
-  };
+  $p->utf8_mode(1);
 
   # Start tags
   $p->handler(start => 'start', 'self, tagname, attr, text, line');
diff -r 0dfa6acfa23d -r c6f199295f1c docs/checklink.html
--- a/docs/checklink.html	Thu Feb 04 19:05:22 2010 +0000
+++ b/docs/checklink.html	Thu Feb 04 19:15:47 2010 +0000
@@ -6,7 +6,7 @@
     <title>W3C Link Checker Documentation</title>
     <link rev="made" href="mailto:www-validator@w3.org" />
     <style type="text/css" media="all">@import "linkchecker.css";</style>
-    <meta name="revision" content="$Id: checklink.html,v 1.57 2010-01-14 16:55:18 ville Exp $" />
+    <meta name="revision" content="$Id: checklink.html,v 1.58 2010-02-04 19:15:47 ville Exp $" />
   </head>
 
   <body>
@@ -132,7 +132,8 @@
 
     <ol>
       <li>
-	Install <a href="http://www.perl.org/get.html">Perl</a>.
+	Install <a href="http://www.perl.org/get.html">Perl</a>, version 5.8
+        or newer.
       </li>
       <li>
 	You will need the following <a href="http://www.cpan.org/">CPAN</a>
@@ -324,7 +325,7 @@
     <address>
       <a title="Send Feedback for the W3C Link Checker"
         href="http://validator.w3.org/feedback.html">The W3C Validator Team</a><br />
-      $Date: 2010-01-14 16:55:18 $
+      $Date: 2010-02-04 19:15:47 $
     </address>
     <p class="copyright">
       <a rel="Copyright" href="http://www.w3.org/Consortium/Legal/ipr-notice#Copyright">Copyright</a> &copy; 1994-2010

Received on Thursday, 5 August 2010 14:47:40 UTC