win32/bin/pl2bat.pl doesn't work correctly

	Message-ID: <37aa5f9b.12941448@smtp1.ibm.net>

p4raw-id: //depot/perl@3829

diff --git a/win32/bin/pl2bat.pl b/win32/bin/pl2bat.pl
index d3a9c0b..cdbac6f 100644 (file)
--- a/win32/bin/pl2bat.pl
+++ b/win32/bin/pl2bat.pl
@@ -251,16 +251,20 @@ be used.
 
 One approach is:
 
-    #!perl
-    while( <DATA> ) {
-       last   if  /^__END__$/;
-       [...]
-    }
-    __END__
-    lines of data
-    to be processed
-    __END__
-    :endofperl
+    .  #!perl
+    .  while( <DATA> ) {
+    .    last   if  /^__END__$/;
+    .    [...]
+    .  }
+    .  __END__
+    .  lines of data
+    .  to be processed
+    .  __END__
+    .  :endofperl
+
+The dots in the first column are only there to prevent F<cmd.exe> to interpret
+the C<:endofperl> line in this documentation.  Otherwise F<pl2bat.bat> itself
+wouldn't work.  See the previous item. :-)
 
 =item The batch file always "succeeds"