From: Jarkko Hietaniemi Date: Sun, 25 Nov 2001 18:23:54 +0000 (+0000) Subject: The joys of portable quoting. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ecae74d57f163b118cfb0c091a7f996cb47d5861;p=p5sagit%2Fp5-mst-13.2.git The joys of portable quoting. p4raw-id: //depot/perl@13264 --- diff --git a/ext/Devel/PPPort/harness/Makefile.PL b/ext/Devel/PPPort/harness/Makefile.PL index 0059272..59c6c0c 100644 --- a/ext/Devel/PPPort/harness/Makefile.PL +++ b/ext/Devel/PPPort/harness/Makefile.PL @@ -36,6 +36,8 @@ EOM my $Ilibdir = $^O eq 'VMS' ? qq{"-I$libdir"} : qq{-I$libdir}; + $pmfile =~ s:\\:\\\\:g; + $retval .= qq[\t\$(PERL) $Ilibdir -e "require qq{$pmfile}; Devel::PPPort::WriteFile(qq{ppport.h})"]; return $retval;