X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperlebcdic.pod;h=86dcba29a5444dd84d93de65eb58e2b0efb15675;hb=6aa71d6ea27a640886ba2dcf7250d1be73560df8;hp=c98b46c6e7fd12837799c06c8a494fda6ad9319f;hpb=84f709e736e1ecec2cb204663711a2f0ea2f0e83;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/perlebcdic.pod b/pod/perlebcdic.pod index c98b46c..86dcba2 100644 --- a/pod/perlebcdic.pod +++ b/pod/perlebcdic.pod @@ -1054,7 +1054,7 @@ following will print "Yes indeed\n" on either an ASCII or EBCDIC computer: $all_byte_chrs = ''; for (0..255) { $all_byte_chrs .= chr($_); } $uuencode_byte_chrs = pack('u', $all_byte_chrs); - ($uu = <<' ENDOFHEREDOC') =~ s/^\s*//gm; + ($uu = <<'ENDOFHEREDOC') =~ s/^\s*//gm; M``$"`P0%!@<("0H+#`T.#Q`1$A,4%187&!D:&QP='A\@(2(C)"4F)R@I*BLL M+2XO,#$R,S0U-C'EZ>WQ]?G^`@8*#A(6&