summaryrefslogtreecommitdiff
path: root/win32
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-07-18 00:47:17 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-07-18 00:47:17 +0000
commit517db07721f121446b16672c63a0ca8d753c8eea (patch)
treea4994c28dd877be639ad544a70f06fabdefeeca0 /win32
parent2c08089c66da191f6b81e0bb31996095180cb48c (diff)
downloadperl-517db07721f121446b16672c63a0ca8d753c8eea.tar.gz
ensure __END__ appears on a line by itself in wrapped
scripts (thanks to Steve Tolkin <tolkin@mediaone.net>); mention caveat about successfull kill() p4raw-id: //depot/perl@3689
Diffstat (limited to 'win32')
-rw-r--r--win32/bin/pl2bat.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/bin/pl2bat.pl b/win32/bin/pl2bat.pl
index 2fa8088500..f33b46c3df 100644
--- a/win32/bin/pl2bat.pl
+++ b/win32/bin/pl2bat.pl
@@ -64,7 +64,7 @@ EOT
}
$head =~ s/^\t//gm;
my $headlines = 2 + ($head =~ tr/\n/\n/);
-my $tail = "__END__\n:endofperl\n";
+my $tail = "\n__END__\n:endofperl\n";
@ARGV = ('-') unless @ARGV;