Do a Makefile escape of any single '$' in the rpath value ($ -> $$)

Since the rpath value may also be consumed in a test in Makefile.PL where it doesn't need to be escaped, it's inconvenient to unescape it there.
Perl-Toolchain-Gang · Mar 23, 2023 · 91977a5 · 91977a5
1 parent 03ca89a
commit 91977a5
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/lib/ExtUtils/Liblist/Kid.pm b/lib/ExtUtils/Liblist/Kid.pm
@@ -84,6 +84,10 @@ sub _unix_os2_ext {
                 elsif ( $Config{'lddlflags'} =~ /-R/ ) {
                     $rtype = '-R';
                 }
+                if ($thislib =~ s{(?<!\$)\$(?!\$)}{\\\$\$}g) {
+                    print "Escaping single dollar sign for Makefile\n"
+                      if $verbose;
+                }
             } elsif (!-d $thislib ) {
                 warn "$ptype$thislib ignored, directory does not exist\n"
                   if $verbose;