[go: up one dir, main page]

Remove redundant perl version checks
authorAndrew Dunstan <andrew@dunslane.net>
Wed, 26 Jun 2024 11:01:47 +0000 (07:01 -0400)
committerAndrew Dunstan <andrew@dunslane.net>
Wed, 26 Jun 2024 11:01:47 +0000 (07:01 -0400)
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
src/tools/pgindent/pgindent

index 8fd7f998bc2a33d92897c751e12b95aa8656524a..72cb53f6e3e99968595079b329f0fed2b8cfbf53 100644 (file)
@@ -6,7 +6,6 @@
 use strict;
 use warnings;
 
-use 5.008001;
 use vars qw(%_SHARED $_TD);
 
 PostgreSQL::InServer::Util::bootstrap();
index 2ef07bb9fd53047c8e90d272442850112493ece8..47d2790ef60f7a0944277842b8fe9b4486994caf 100755 (executable)
@@ -4,7 +4,6 @@
 
 use strict;
 use warnings;
-use 5.008001;
 
 use Cwd qw(abs_path getcwd);
 use File::Find;