summaryrefslogtreecommitdiff
path: root/pod/pod2man.PL
diff options
context:
space:
mode:
Diffstat (limited to 'pod/pod2man.PL')
-rw-r--r--pod/pod2man.PL6
1 files changed, 3 insertions, 3 deletions
diff --git a/pod/pod2man.PL b/pod/pod2man.PL
index 0a51fc8efd..68121e482c 100644
--- a/pod/pod2man.PL
+++ b/pod/pod2man.PL
@@ -25,14 +25,14 @@ print "Extracting $file (with variable substitutions)\n";
# You can use $Config{...} to use Configure variables.
print OUT <<"!GROK!THIS!";
-$Config{'startperl'}
+$Config{startperl}
+ eval 'exec $Config{perlpath} -S \$0 \${1+"\$@"}'
+ if \$running_under_some_shell;
!GROK!THIS!
# In the following, perl variables are not expanded during extraction.
print OUT <<'!NO!SUBS!';
-eval 'exec perl -S $0 "$@"'
- if 0;
=head1 NAME