Add explanation of common usage

[p5sagit/p5-mst-13.2.git] / makeaperl.SH

diff --git a/makeaperl.SH b/makeaperl.SH
index bb266f4..6af9419 100644 (file)
--- 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!'