perl: bump the required Perl version to 5.8.1 from 5.8.0
The following commit will make use of a Getopt::Long feature which is only present in Perl >= 5.8.1. Document that as the minimum version we support. Many of our Perl scripts will continue to run with 5.8.0 but this change allows us to adjust them as needed without breaking any promises to our users. The Perl requirement was last changed in d48b284183 (perl: bump the required Perl version to 5.8 from 5.6.[21], 2010-09-24). At that time, 5.8.0 was 8 years old. It is now over 21 years old. Signed-off-by: Todd Zullinger <tmz@pobox.com> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Todd Zullinger committed
Nov 16, 2023 at 14:30 UTC
d13a73e383076636534e10ba799af0c9a2b85357
22 files changed
+23
-23
Documentation/CodingGuidelines
+1
-1
@@ -490,7 +490,7 @@ For Perl programs:
490
491
- Most of the C guidelines above apply.
492
493
- - We try to support Perl 5.8 and later ("use Perl 5.008").
493
+ - We try to support Perl 5.8.1 and later ("use Perl 5.008001").
494
495
- use strict and use warnings are strongly preferred.
496
INSTALL
+1
-1
@@ -119,7 +119,7 @@ Issues of note:
119
- A POSIX-compliant shell is required to run some scripts needed
120
for everyday use (e.g. "bisect", "request-pull").
121
122
- - "Perl" version 5.8 or later is needed to use some of the
122
+ - "Perl" version 5.8.1 or later is needed to use some of the
123
features (e.g. sending patches using "git send-email",
124
interacting with svn repositories with "git svn"). If you can
125
live without these, use NO_PERL. Note that recent releases of
contrib/diff-highlight/DiffHighlight.pm
+1
-1
@@ -1,6 +1,6 @@
1
package DiffHighlight;
2
3
-use 5.008;
3
+use 5.008001;
4
use warnings FATAL => 'all';
5
use strict;
6
contrib/mw-to-git/Git/Mediawiki.pm
+1
-1
@@ -1,6 +1,6 @@
1
package Git::Mediawiki;
2
3
-use 5.008;
3
+use 5.008001;
4
use strict;
5
use POSIX;
6
use Git;
git-archimport.perl
+1
-1
@@ -54,7 +54,7 @@ and can contain multiple, unrelated branches.
54
55
=cut
56
57
-use 5.008;
57
+use 5.008001;
58
use strict;
59
use warnings;
60
use Getopt::Std;
git-cvsexportcommit.perl
+1
-1
@@ -1,6 +1,6 @@
1
#!/usr/bin/perl
2
3
-use 5.008;
3
+use 5.008001;
4
use strict;
5
use warnings;
6
use Getopt::Std;
git-cvsimport.perl
+1
-1
@@ -13,7 +13,7 @@
13
# The head revision is on branch "origin" by default.
14
# You can change that with the '-o' option.
15
16
-use 5.008;
16
+use 5.008001;
17
use strict;
18
use warnings;
19
use Getopt::Long;
git-cvsserver.perl
+1
-1
@@ -15,7 +15,7 @@
15
####
16
####
17
18
-use 5.008;
18
+use 5.008001;
19
use strict;
20
use warnings;
21
use bytes;
git-send-email.perl
+2
-2
@@ -16,7 +16,7 @@
16
# and second line is the subject of the message.
17
#
18
19
-use 5.008;
19
+use 5.008001;
20
use strict;
21
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
22
use Getopt::Long;
@@ -228,7 +228,7 @@ sub system_or_msg {
228
my @sprintf_args = ($cmd_name ? $cmd_name : $args->[0], $exit_code);
229
if (defined $msg) {
230
# Quiet the 'redundant' warning category, except we
231
- # need to support down to Perl 5.8, so we can't do a
231
+ # need to support down to Perl 5.8.1, so we can't do a
232
# "no warnings 'redundant'", since that category was
233
# introduced in perl 5.22, and asking for it will die
234
# on older perls.
git-svn.perl
+1
-1
@@ -1,7 +1,7 @@
1
#!/usr/bin/perl
2
# Copyright (C) 2006, Eric Wong <normalperson@yhbt.net>
3
# License: GPL v2 or later
4
-use 5.008;
4
+use 5.008001;
5
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
6
use strict;
7
use vars qw/ $AUTHOR $VERSION
gitweb/INSTALL
+1
-1
@@ -29,7 +29,7 @@ Requirements
29
------------
30
31
- Core git tools
32
- - Perl 5.8
32
+ - Perl 5.8.1
33
- Perl modules: CGI, Encode, Fcntl, File::Find, File::Basename.
34
- web server
35
gitweb/gitweb.perl
+1
-1
@@ -7,7 +7,7 @@
7
#
8
# This program is licensed under the GPLv2
9
10
-use 5.008;
10
+use 5.008001;
11
use strict;
12
use warnings;
13
# handle ACL in file access tests
perl/Git.pm
+1
-1
@@ -7,7 +7,7 @@ Git - Perl interface to the Git version control system
7
8
package Git;
9
10
-use 5.008;
10
+use 5.008001;
11
use strict;
12
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
13
perl/Git/I18N.pm
+1
-1
@@ -1,5 +1,5 @@
1
package Git::I18N;
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
5
BEGIN {
perl/Git/LoadCPAN.pm
+1
-1
@@ -1,5 +1,5 @@
1
package Git::LoadCPAN;
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
5
perl/Git/LoadCPAN/Error.pm
+1
-1
@@ -1,5 +1,5 @@
1
package Git::LoadCPAN::Error;
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
5
use Git::LoadCPAN (
perl/Git/LoadCPAN/Mail/Address.pm
+1
-1
@@ -1,5 +1,5 @@
1
package Git::LoadCPAN::Mail::Address;
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
5
use Git::LoadCPAN (
perl/Git/Packet.pm
+1
-1
@@ -1,5 +1,5 @@
1
package Git::Packet;
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
5
BEGIN {
t/t0202/test.pl
+1
-1
@@ -1,5 +1,5 @@
1
#!/usr/bin/perl
2
-use 5.008;
2
+use 5.008001;
3
use lib (split(/:/, $ENV{GITPERLLIB}));
4
use strict;
5
use warnings;
t/t5562/invoke-with-content-length.pl
+1
-1
@@ -1,4 +1,4 @@
1
-use 5.008;
1
+use 5.008001;
2
use strict;
3
use warnings;
4
t/t9700/test.pl
+1
-1
@@ -1,7 +1,7 @@
1
#!/usr/bin/perl
2
use lib (split(/:/, $ENV{GITPERLLIB}));
3
4
-use 5.008;
4
+use 5.008001;
5
use warnings;
6
use strict;
7
t/test-terminal.perl
+1
-1
@@ -1,5 +1,5 @@
1
#!/usr/bin/perl
2
-use 5.008;
2
+use 5.008001;
3
use strict;
4
use warnings;
5
use IO::Pty;