From: Perl 5 Porters <perl5-porters.nicoh.com>
Date: Mon, 1 Jan 1996 23:11:28 +0000 (+0000)
Subject: Use the 'new' startperl variable.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d51667254dc13a72f543917eddeeea51c44abbe2;p=p5sagit%2Fp5-mst-13.2.git

Use the 'new' startperl variable.
---

diff --git a/makeaperl.SH b/makeaperl.SH
index bb266f4..6af9419 100755
--- a/makeaperl.SH
+++ b/makeaperl.SH
@@ -18,7 +18,9 @@ case "$0" in
 esac
 echo "Extracting makeaperl (with variable substitutions)"
 $spitshell >makeaperl <<!GROK!THIS!
-#!$binexp/perl
+$startperl
+    eval 'exec perl -S \$0 "\$@"'
+	if 0;
 !GROK!THIS!
 
 $spitshell >>makeaperl <<'!NO!SUBS!'