From dcd46d7df5e7473f60aba2405f770968815b63c9 Mon Sep 17 00:00:00 2001 From: bulk88 Date: Sun, 29 Jun 2025 22:43:35 -0400 Subject: [PATCH] GH #23390 re/Makefile.PL silence uninit $args{"LINKTYPE"} warning https://github.com/Perl/perl5/issues/23390 --- ext/re/Makefile.PL | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/ext/re/Makefile.PL b/ext/re/Makefile.PL index 01786e1ec299..fbd6bee1bd89 100644 --- a/ext/re/Makefile.PL +++ b/ext/re/Makefile.PL @@ -32,9 +32,9 @@ my %args; for my $arg (@ARGV) { $args{$1} = $2 if $arg =~ /^(\w+)=(.*)$/; } -if ($args{LINKTYPE} eq "static") { - $defines .= ' -DPERL_EXT_RE_STATIC'; -} + +$defines .= ' -DPERL_EXT_RE_STATIC' + if exists($args{LINKTYPE}) && $args{LINKTYPE} eq 'static'; my @libs; if ($^O eq 'cygwin' && $Config{usequadmath}) {