X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=win32%2Fbin%2Fpl2bat.pl;h=cdbac6f2735dfc777e2214c941013e4c9ffc72f0;hb=dd629d5bb3bd7014585b7aad3c6715a5011673bc;hp=d3a9c0b779d8be51b64d49f4d3f1cab169702a85;hpb=ef0a8c2a9e34cffb618d4fd6e7676362dedc9421;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/win32/bin/pl2bat.pl b/win32/bin/pl2bat.pl
index d3a9c0b..cdbac6f 100644
--- 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"