perl-unicode

Re: 2 Suprises w/5.8.0

2002-08-01 01:30:05
Andreas J. Koenig <andreas(_dot_)koenig(_at_)anima(_dot_)de> writes:
A scalar that is going to be passed to some extension, be it
Compress::Zlib, Apache::Request or any extension that has no mention
of Unicode in the manpage:

 if ($] > 5.007) {
   require Encode;
   utf8::upgrade($self->{CONTENT}); # make sure it is UTF-8 encoded
     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

Why is that step necessary? encode_utf8() should do that itself on the way ...

   $self->{CONTENT} = Encode::encode_utf8($self->{CONTENT}); # make octets
 }

-- 
Nick Ing-Simmons
http://www.ni-s.u-net.com/

<Prev in Thread] Current Thread [Next in Thread>