Require Perl 5.26.0
Our platform support policy states that we require "versions of dependencies which are generally accepted as stable and supportable, e.g., in line with the version used by other long-term-support distributions". Of Debian, Ubuntu, RHEL, and SLES, the four most common distributions that provide LTS versions, the version with mainstream long-term security support with the oldest Perl is 5.26.0 in SLES 15.6. This is a major upgrade, since Perl 5.8.1, according to the Perl documentation, was released in September of 2003. It brings a lot of new features that we can choose to use, such as s///r to return the modified string, the postderef functionality, and subroutine signatures, although the latter was still considered experimental until 5.36. This change was made with the following one-liner, which intentionally excludes modifying the vendored modules we include to avoid conflicts: git grep -l 'use 5.008001' | grep -v 'LoadCPAN/' | xargs perl -pi -e 's/use 5.008001/require v5.26/' Use require instead of use to avoid changing the behavior as the latter enables features and the former does not. Signed-off-by: brian m. carlson <sandals@crustytoothpaste.net> Signed-off-by: Taylor Blau <me@ttaylorr.com>
This commit is contained in:

committed by
Taylor Blau

parent
7bae4e7f58
commit
702d8c1f3b
2
INSTALL
2
INSTALL
@ -119,7 +119,7 @@ Issues of note:
|
|||||||
- A POSIX-compliant shell is required to run some scripts needed
|
- A POSIX-compliant shell is required to run some scripts needed
|
||||||
for everyday use (e.g. "bisect", "request-pull").
|
for everyday use (e.g. "bisect", "request-pull").
|
||||||
|
|
||||||
- "Perl" version 5.8.1 or later is needed to use some of the
|
- "Perl" version 5.26.0 or later is needed to use some of the
|
||||||
features (e.g. sending patches using "git send-email",
|
features (e.g. sending patches using "git send-email",
|
||||||
interacting with svn repositories with "git svn"). If you can
|
interacting with svn repositories with "git svn"). If you can
|
||||||
live without these, use NO_PERL. Note that recent releases of
|
live without these, use NO_PERL. Note that recent releases of
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
package DiffHighlight;
|
package DiffHighlight;
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use warnings FATAL => 'all';
|
use warnings FATAL => 'all';
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
package Git::Mediawiki;
|
package Git::Mediawiki;
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use POSIX;
|
use POSIX;
|
||||||
use Git;
|
use Git;
|
||||||
|
@ -54,7 +54,7 @@ and can contain multiple, unrelated branches.
|
|||||||
|
|
||||||
=cut
|
=cut
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use Getopt::Std;
|
use Getopt::Std;
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use Getopt::Std;
|
use Getopt::Std;
|
||||||
|
@ -13,7 +13,7 @@
|
|||||||
# The head revision is on branch "origin" by default.
|
# The head revision is on branch "origin" by default.
|
||||||
# You can change that with the '-o' option.
|
# You can change that with the '-o' option.
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use Getopt::Long;
|
use Getopt::Long;
|
||||||
|
@ -15,7 +15,7 @@
|
|||||||
####
|
####
|
||||||
####
|
####
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use bytes;
|
use bytes;
|
||||||
|
@ -16,7 +16,7 @@
|
|||||||
# and second line is the subject of the message.
|
# and second line is the subject of the message.
|
||||||
#
|
#
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
use Getopt::Long;
|
use Getopt::Long;
|
||||||
|
@ -1,7 +1,7 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
# Copyright (C) 2006, Eric Wong <normalperson@yhbt.net>
|
# Copyright (C) 2006, Eric Wong <normalperson@yhbt.net>
|
||||||
# License: GPL v2 or later
|
# License: GPL v2 or later
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
use strict;
|
use strict;
|
||||||
use vars qw/ $AUTHOR $VERSION
|
use vars qw/ $AUTHOR $VERSION
|
||||||
|
@ -7,7 +7,7 @@
|
|||||||
#
|
#
|
||||||
# This program is licensed under the GPLv2
|
# This program is licensed under the GPLv2
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
# handle ACL in file access tests
|
# handle ACL in file access tests
|
||||||
|
@ -7,7 +7,7 @@ Git - Perl interface to the Git version control system
|
|||||||
|
|
||||||
package Git;
|
package Git;
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
|
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
package Git::I18N;
|
package Git::I18N;
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
package Git::LoadCPAN;
|
package Git::LoadCPAN;
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
|
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
package Git::Packet;
|
package Git::Packet;
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
use warnings $ENV{GIT_PERL_FATAL_WARNINGS} ? qw(FATAL all) : ();
|
||||||
BEGIN {
|
BEGIN {
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use lib (split(/:/, $ENV{GITPERLLIB}));
|
use lib (split(/:/, $ENV{GITPERLLIB}));
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
@ -1,4 +1,4 @@
|
|||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
|
@ -1,7 +1,7 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
use lib (split(/:/, $ENV{GITPERLLIB}));
|
use lib (split(/:/, $ENV{GITPERLLIB}));
|
||||||
|
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
use 5.008001;
|
require v5.26;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use IO::Pty;
|
use IO::Pty;
|
||||||
|
Reference in New Issue
Block a user