| |
| | [PATCH] Code clean up for perlebcdic.pod |
 | | But note too that -because "\n" is chr(13) and "\r" is chr(10) on the MacIntosh (which is an +from either a CCSID 0037, a 1047, or a POSIX-BC EBCDIC machine since "\r" eq +chr(13) under all of those coded character sets. |
 | | '/'; To convert from EBCDIC 037 to ASCII just reverse the order of the tr/// @@ -601,12 +684,12 @@ shell utility from within perl would be to: # OS/390 or z/OS example - $ascii_data = `echo '$ebcdic_data' |
 | | Examples of usage on EBCDIC include: + my $foo; $foo = pack("CCCC",193,194,195,196); # $foo eq "ABCD" - $foo = pack("C4",193,194,195,196); + $foo = pack("C4", 193,194,195,196); # same thing $foo = pack("ccxxcc",193,194,195,196); @@ -759,7 +843,7 @@ See the discussion of printf() above. |
| www.mail-archive.com /perl-documentation@perl.org/msg00197.html (853 words) |
|