--- help2man.PL	Fri Sep  6 17:14:18 2002
+++ help2man.PL.new	Tue Jan 28 21:02:32 2003
@@ -45,7 +45,11 @@
     unless $opts{quiet};
 
 # Add startup header.
-print OUT "$Config{startperl} -w\n";
+print OUT <<END;
+$Config{startperl}
+    eval 'exec $Config{perlpath} -S \$0 \${1+"\$@"}'
+        if \$running_under_some_shell;
+END
 
 # For systems without the crash-bang hack also add:
 print OUT <<"!GROK!THIS!" if $Config{sharpbang} !~ /^#!/;