Package: perl
Version: 5.8.8-12
Severity: normal

Converting a certain sequence of ISO-2022-JP text to utf8 succeeds:
$  perl -MEncode -e '$s= "{\x1b\x24\x42\x2d)\x1b(B}"; print
encode("utf8", decode("iso-2022-jp", $s, Encode::FB_CROAK)), "\n"'
{⑨}

However, converting it back to ISO-2022-JP fails:
$ perl -MEncode -e '$s= "{\x1b\x24\x42\x2d)\x1b(B}"; print
encode("iso-2022-jp", decode("iso-2022-jp", $s, Encode::FB_CROAK)),
"\n"'
{\x{2468}}

It should be noted that iconv rejects this entirely:
$ perl -MEncode -e '$s= "{\x1b\x24\x42\x2d)\x1b(B}"; print $s,
"\n"'|iconv -f iso-2022-jp -t utf8
{iconv: illegal input sequence at position 4

However, if this is truly invalid iso-2022-jp, perl should croak on it, since
FB_CROAK was passed.

-- System Information:
Debian Release: lenny/sid
  APT prefers testing
  APT policy: (990, 'testing'), (500, 'unstable')
Architecture: i386 (i686)

Kernel: Linux 2.6.18.8-domU-linode7 (SMP w/4 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash

Versions of packages perl depends on:
ii  libc6                         2.7-6      GNU C Library: Shared libraries
ii  libdb4.6                      4.6.21-5   Berkeley v4.6 Database Libraries [
ii  libgdbm3                      1.8.3-3    GNU dbm database routines (runtime
ii  perl-base                     5.8.8-12   The Pathologically Eclectic Rubbis
ii  perl-modules                  5.8.8-12   Core Perl modules

Versions of packages perl recommends:
ii  perl-doc                      5.8.8-12   Perl documentation

-- no debconf information



-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to