postgres.git / summary / log / commit / refs

commit    8f3be9661f7681624b3fa5454df0bd2ccf708351
Author:   Andrew Dunstan <andrew@dunslane.net>
Date:     Wed Jun 26 11:01:47 2024 +0000
First released in: 12.20, 13.16, 14.13, 15.8

    Remove redundant perl version checks
    
    Commit 4c1532763a removed some redundant uses of 'use 5.008001;' in perl
    scripts, including in plperl's plc_perlboot.pl. Because it made other
    changes it wasn't backpatched. However, now this is causing a failure on
    back branches when built with bleeding edge perl. Therefore, backpatch
    just that part of it which removed those uses, from 15 all the way down
    to 9.2, which is the earliest version currently built in the buildfarm.
    
    per report from Alexander Lakhin
    
    Discussion: https://postgr.es/m/4cc2ee93-e03c-8e13-61ed-412e7e6ff19d@gmail.com


 src/pl/plperl/plc_perlboot.pl | 1 -
 src/tools/pgindent/pgindent   | 1 -
 2 files changed, 2 deletions(-)

diff --git a/src/pl/plperl/plc_perlboot.pl b/src/pl/plperl/plc_perlboot.pl
index d506d01163b..e8aab9b8251 100644
--- a/src/pl/plperl/plc_perlboot.pl
+++ b/src/pl/plperl/plc_perlboot.pl
@@ -1,6 +1,5 @@
 #  src/pl/plperl/plc_perlboot.pl
 
-use 5.008001;
 use vars qw(%_SHARED $_TD);
 
 PostgreSQL::InServer::Util::bootstrap();
diff --git a/src/tools/pgindent/pgindent b/src/tools/pgindent/pgindent
index 1912efa8159..6763ae24fa2 100755
--- a/src/tools/pgindent/pgindent
+++ b/src/tools/pgindent/pgindent
@@ -2,7 +2,6 @@
 
 use strict;
 use warnings;
-use 5.008001;
 
 use Cwd qw(abs_path getcwd);
 use File::Find;


[parent: 524440579f83]