X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pod%2Fperluniintro.pod;h=751bdc6f02af364b3da93affc456ab8804161cff;hb=a8476e91ee770bd8b0c7183fe1314d9effd435ad;hp=feee902a7f7ba3f3b6cc74a8df19f95283bbbe3b;hpb=d0551e7362dcfdf0d37c8900b7c6372851ee7f19;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pod/perluniintro.pod b/pod/perluniintro.pod index feee902..751bdc6 100644 --- a/pod/perluniintro.pod +++ b/pod/perluniintro.pod @@ -504,7 +504,7 @@ Yet another way would be to use the Devel::Peek module: That shows the UTF8 flag in FLAGS and both the UTF-8 bytes and Unicode characters in C. See also later in this document -the discussion about the C function of the C module. +the discussion about the C function. =back @@ -625,8 +625,7 @@ didn't get the transparency of Unicode quite right. Okay, if you insist: - use Encode 'is_utf8'; - print is_utf8($string) ? 1 : 0, "\n"; + print utf8::is_utf8($string) ? 1 : 0, "\n"; But note that this doesn't mean that any of the characters in the string are necessary UTF-8 encoded, or that any of the characters have @@ -887,6 +886,6 @@ mailing lists for their valuable feedback. =head1 AUTHOR, COPYRIGHT, AND LICENSE -Copyright 2001-2002 Jarkko Hietaniemi +Copyright 2001-2002 Jarkko Hietaniemi Ejhi@iki.fiE This document may be distributed under the same terms as Perl itself.