diff options
Diffstat (limited to 'win32/bin/pl2bat.bat')
| -rw-r--r-- | win32/bin/pl2bat.bat | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/win32/bin/pl2bat.bat b/win32/bin/pl2bat.bat index f9b4902a13..73456531a8 100644 --- a/win32/bin/pl2bat.bat +++ b/win32/bin/pl2bat.bat @@ -43,9 +43,8 @@ sub process { s/\.pl$//; $_ .= '.bat' unless /\.bat$/ or /^-$/; open( FILE, ">$_" ) or die "Can't open $_: $!"; - $myhead =~ s/perl -x/perl/ unless $linedone; print FILE $myhead; - print FILE "#line $headlines\n" unless $linedone; + print FILE "#!perl\n#line " . ($headlines+1) . "\n" unless $linedone; print FILE @file, $tail; close( FILE ); } |