Example:
use Encode qw(:all);
$big5 = "\x88\x71"; # U+00ED in Big-5 HKSCS
$utf8 = decode("Big5" => $big5, Encode::FB_WARN);
print $ascii = encode("ascii" => $utf8, Encode::FB_XMLCREF);
before the patch (no warning)
ˆq
after the patch (warned)
big5-eten "\x88" does not map to Unicode
at D:/perl/bp581/lib/Encode.pm line 156.
The message is not 'big5-eten "\x88\x71" does not map to Unicode..',
of course (big5-eten.ucm does not define "\x88\x71"
as a double-byte char), that may be what is expected, though.
Regards,
SADAHIRO Tomoyuki
On Tue, 25 Mar 2003 21:53:13 +0900
SADAHIRO Tomoyuki <bqw10602(_at_)nifty(_dot_)com> wrote:
Well, is it right?
I'm not sure of the status and the single byte-range
for Big-5, though.
diff -urN ucm~/big5-eten.ucm ucm/big5-eten.ucm
--- ucm~/big5-eten.ucm Thu Jan 23 23:21:00 2003
+++ ucm/big5-eten.ucm Tue Mar 25 21:43:00 2003
(snip)
diff -urN ucm~/big5-hkscs.ucm ucm/big5-hkscs.ucm
--- ucm~/big5-hkscs.ucm Thu Jan 23 23:21:02 2003
+++ ucm/big5-hkscs.ucm Tue Mar 25 21:37:10 2003
(snip)