Re: [MacPerl] Japanese Pages getting corrupted

[Chris Nandor <pudge@pobox.com>]

At 12:46 -0700 1999.10.03, Ward W. Vuillemot wrote:
>I have a problem with some html pages in Japanese.  My scripts does the
>following:
>
>open(CONT,"$content_file") || print STDERR "Unable to open or read
>$content_file: $!\n";
>@cont=<CONT>;
>close(CONT);
>@cont = "$NO_CONTENT" if (! @cont); # print something if files is empty
>print "@cont";
>
>The problem is that when $content_file is not standard ASCII but EUC or
>S-JIS or JIS then @cont becomes garbled.

Please describe "garbled".  Could it be you are just viewing it in a font
that makes it look garbled?  Perl does no manipulation of the bytes in such
code (unless you are using Windows or some other platform where
binmode(CONT) would take care of the problem).

-- 
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org