Charset::JA_JP(3p)

NAME
MIME::Charset::JA_JP - MIME XXXXXXXXXXXXXX

SYNOPSIS
    use MIME::Charset:

    $charset = MIME::Charset->new("euc-jp");

XXXXXXXXXXXXX:

    $benc = $charset->body_encoding; # X "Q"
    $cset = $charset->as_string; # X "US-ASCII"
    $henc = $charset->header_encoding; # X "S"
    $cset = $charset->output_charset; # X "ISO-2022-JP"

XXXXXXXXXX:

    ($text, $charset, $encoding) =
        $charset->header_encode(
           "\xc9\xc2\xc5\xaa\xc0\xde\xc3\xef\xc5\xaa".
           "\xc7\xd1\xca\xaa\xbd\xd0\xce\xcf\xb4\xef",
           Charset => 'euc-jp');
    # ...XXX (<XXXXXXX>, "ISO-2022-JP", "B") XXXX

    ($text, $charset, $encoding) =
        $charset->body_encode(
            "Collectioneur path\xe9tiquement ",
            Charset => 'latin1');
    # ...XXX (<XXXXX>, "ISO-8859-1", "QUOTED-PRINTABLE") XXXX

    $len = $charset->encoded_header_len(
        "Perl\xe8\xa8\x80\xe8\xaa\x9e",
        Charset => "utf-8",
        Encoding => "b");
    # ...XXX 28 XXXX

XXXXXXXXXXX:

    MIME::Charset::alias("csEUCKR", "euc-kr");
    MIME::Charset::default("iso-8859-1");
    MIME::Charset::fallback("us-ascii");

XOOXX (XXXXXXX):

    use MIME::Charset qw(:info);

    $benc = body_encoding("iso-8859-2"); # "Q"
    $cset = canonical_charset("ANSI X3.4-1968"); # "US-ASCII"
    $henc = header_encoding("utf-8"); # "S"
    $cset = output_charset("shift_jis"); # "ISO-2022-JP"

    use MIME::Charset qw(:trans);

    ($text, $charset, $encoding) =
        header_encode(
           "\xc9\xc2\xc5\xaa\xc0\xde\xc3\xef\xc5\xaa".
           "\xc7\xd1\xca\xaa\xbd\xd0\xce\xcf\xb4\xef",
           "euc-jp");
    # ...(<XXXXXXXXX>, "ISO-2022-JP", "B") XXXX

    ($text, $charset, $encoding) =
        body_encode(
            "Collectioneur path\xe9tiquement ".
            "\xe9clectique de d\xe9chets",
            "latin1");
    # ...(<XXXXXX>, "ISO-8859-1", "QUOTED-PRINTABLE") XXXX

    $len = encoded_header_len(
        "Perl\xe8\xa8\x80\xe8\xaa\x9e", "b", "utf-8"); # 28

DESCRIPTION
MIME::Charset XXXXXXXXXXXX MIME XXXXXXXXXXXXXXXXXXXXXXXXXX

  XX
XXXXXXXX XXXMIME XX ``character set'' XXXXX XXXXXXXXXXXXXXXXXXXXXXX XXXXISO/IEC XXXX ``XXXXXXX'' (CCS) X ``XXXXXX'' (CES) XXXXXXXXXXXX

XXXXXXXX XXXMIME XXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXX US-ASCII XXXXXXXXXXXXXXXXX

  XXXXXXX

$charset = MIME::Charset->new([CHARSET [, OPTS]])
    XXXXXXXXXXXXXXXXXXXXXX

    OPTS XXXXXXXXXXXX NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXXXXXXXXXXXXXXX

    Mapping => MAPTYPE
        XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "EXTENDED" XXXXXXXXXXXX "STANDARD" XXXXXXXXXXXXXXXXXXXXX XXX "EXTENDED"X

  XXXXXXXXXXXXX

$charset->body_encoding
body_encoding CHARSET
    CHARSET XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

    XXX "B" (BASE64)X"Q" (QUOTED-PRINTABLE)X"S" (XXXXXXXX)X "undef" (XXXXXXXXXXXXX --- 7BIT X 8BIT) XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

$charset->as_string
canonical_charset CHARSET
    XXXXXXXXXXXXXXXXXXXX

$charset->decoder
    XXXXXXXXX Unicode XXXXXXXXX "Encode::Encoding" XXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXundef XXXXX

detect_7bit_charset STRING
    XXX STRING XXXXXXXX7 XXXXXXXXXXXXXXXXX

$charset->dup
    XXXXXXXXXXXXXXXXXXXX

$charset->encoder([CHARSET])
    XXXXXXXXX MIME XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "Encode::Encoding" XXXXXXXXXX

    CHARSET XXXXXXXXXX$charset XXXXXXXXXXX (XXXXXXXXXXXXXX) XXCHARSET XXXXXXXXXX XXXX$charset XXXXXXXXXXXXXXXXXXXXXX CHARSET XXXXXXXXX

$charset->header_encoding
header_encoding CHARSET
    CHARSET XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

    XXX "B"X"Q"X"S" (XXXXXXXXXX)X "undef" (XXXXXXXXXXX) XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

$charset->output_charset
output_charset CHARSET
    XXXX CHARSET XXXXXXXXXXXXXX MIME XXXXXXXXXXXXXXXXXXXXXXXXXX (XXXXXXXXXXXXX) XXXXX

    Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXX "canonical_charset" XXXXXXX

  XXXXXXXXXX

$charset->body_encode(STRING [, OPTS])
body_encode STRING, CHARSET [, OPTS]
    STRING X (XXXX) XXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXX CHARSET X STRING XXXXXXXXXXXXXXXXX

    OPTS XXXXXXXXXXXXX NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXXXXXXXXXXXXXXXX

    Detect7bit => YESNO
        CHARSET XXXXXX7XXXXXXXXXXXXXXXXXXXXXXXX XXX "YES"X

    Replacement => REPLACEMENT
        XXXXXXXXXX"XXXXX" XXX

    3XXXXXX (XXXXXXXX, XXXXXXXXXXX, XXXXXXXXXX) XXXX XXXXXXXXXX X "BASE64"X"QUOTED-PRINTABLE"X "7BIT"X"8BIT" XXXXXXXXXXXXXXXXX XXXXXXX XXXXXXXX X ASCIIXXXXXXXXXXXXX XXXXXXXXXXX X "undef"XXXXXXXXXXX X "BASE64" XXXX XXXXXXXXXXX X "US-ASCII" XXXXXXXXXX ASCIIXXXXXXXXXXXXXXXXX

$charset->decode(STRING [,CHECK])
    STRING X Unicode XXXXXXXXX

    NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXX

$charset->encode(STRING, [, CHECK])
    STRING (Unicode XXXXXXXXXXXX) XX XXXXXXXXXXXXXXXXXXXXXXX MIME XXXXXXXXXXXXXXXXXXXXXXXXX (XXXXXXXXXXXXX) XXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXX XXXX Unicode XXXXXXXXXXXXXXXXXX

    NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXX

$charset->encoded_header_len(STRING [,ENCODING])
encoded_header_len STRING, ENCODING, CHARSET
    STRING XXXXXXXXXXXXXXXXXXXXXXXX (XXXXXXXXXX) XXXXXX

    ENCODING X "B"X"Q"X"S" ("B" X "Q" XXXXXXXXX) XXXXXX

$charset->heder_encode(STRING [, OPTS])
header_encode STRING, CHARSET [, OPTS]
    STRING X (XXXX) XXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXX CHARSET X STRING XXXXXXXXXXXXXXXXX

    OPTS XXXXXXXXXXXXX NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXXXXXXXXXXXXXXXX

    Detect7bit => YESNO
        CHARSET XXXXXX7XXXXXXXXXXXXXXXXXXXXXXXX XXX "YES"X

    Replacement => REPLACEMENT
        XXXXXXXXXX"XXXXX" XXX

    3XXXXXX (XXXXXXXX, XXXXXXXXXXX, XXXXXXXXX) XXXX XXXXXXXXX X "B"X"Q"X"undef" (XXXXXXXXXXX) XXXXXX XXXXXXXXXXX XXXXXXXXXXXXXXX X ASCIIXXXXXXXXXXXXXXXXXXXXXXXX X "8BIT" (XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX) X XXXXXXXXX X "undef" (XXXXXXXXXXXXX) XXXX XXXXXXXXXXX X "US-ASCII" XXXXXXXXXX ASCIIXXXXXXXXXXXXXXXXX

$charset->undecode(STRING [,CHECK])
    Unicode XXX string XX $charset XXXXXXXXXXXXXXXXXXXXXXXX XXX "$charset->decoder->encode()" XXXXXXX

    NOTE: Unicode/XXXXXXXXXXXXXXXXXXXX ("USE_ENCODE" XX) XX XXXXXXXXXXXXX

  XXXXXXXXXXX

alias ALIAS [, CHARSET]
    "canonical_charset" XXXXXXXXXXXXXXXXXXXXXXXXXX/XXXXX

    CHARSET XXXXXXXXXXXALIAS X CHARSET XXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXX XX ALIAS XXXXXXXXXXXXXXXXXXXX

default [CHARSET]
    XXXXXXXXXXXXX/XXXXX

    XXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXX XXXXXXX "US-ASCII"X

    CHARSET XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXX

    NOTE: XXXXXXXXXXXXXXXXXXXXXX

fallback [CHARSET]
    XXXXXXXXXXXXX/XXXXX

    XXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX "FALLBACK" XXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX "UTF-8"X

    CHARSET XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX CHARSET X "NONE" XXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXX

    NOTE: XXXXXXXXXXX "US-ASCII" XXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXX

recommended CHARSET [, HEADERENC, BODYENC [, ENCCHARSET]]
    XXXXXXXXXXXXXX/XXXXX

    XXXXXXXXXXXXXXXXXXXXXXXX XXXXX CHARSET XXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXCHARSET XXXXXXX 3 XXXXXX (HEADERENC, BODYENC, ENCCHARSET) XXXXXX

    HEADERENC XXXXXXXXXXXXXXXXXXXXXXXXX "B"X"Q"X"S" (XXXXXXXXXX)X "undef" (XXXXXXXXXXX) XXXXXXX

    BODYENC XXXXXXXXXXXXXXXXXXXXXXXXX "B"X"Q"X"S" (XXXXXXXXXX)X"undef" (XXXXXXXXXXXXX) XXXXXXX

    ENCCHARSET XXXXXX CHARSET XXXXXXXXXXXXXX MIME XXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX (XXXXXXXXXXXXXXXXXXXXXXXXXX) XXXX ENCCHARSET X "undef"X

    NOTE: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX (XXXXXXXXXXXXXXXXXXXXXXXX)X XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "header_encoding"X"body_encoding"X"output_charset" XXXXXXXX

  XX

USE_ENCODE
    Unicode/XXXXXXXXXXXX Unicode XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXX Perl 5.8.0 XXXXXXXXXXXXXXX Perl XXXXXXXX

  XXXXX
"body_encode" X "header_encode" X "Replacement" XXXXXXXXXXXXXXXXXX:

"DEFAULT"
    XXXXXXXXXXXXXXXXXXX UCM XXXXXXXXXXXXXXXXXXXXX <subchar> XXXXXXXXX

"FALLBACK"
    XXXXXXXXXX XXXX "DEFAULT" XXXXXXXX ("fallback" XX)X XXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXX

"CROAK"
    XXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXX eval{} XXXXXXXXXXXXXXXXXXXXX "STRICT" XXXXX

"PERQQ"
"HTMLCREF"
"XMLCREF"
    Encode XXXXXXXXXXXX "FB_PERLQQ"X"FB_HTMLCREF"X"FB_XMLCREF" XXXXXXX

XX  XXXXXXXXXXXXXX XXX "Handling Malformed Data" in Encode XXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX "DEFAULT" XXXXX

  XXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXX MIME/Charset/Defaults.pm XXXXXXXXXXXX XXXX MIME/Charset/Defaults.pm.sample XXXXXXXX

VERSION
$VERSION XXXXXXXXX

XXXXXXXXXXXX <http://hatuka.nezumi.nu/repos/MIME-Charset/> XXXX

  XXXXXX

XXXX 1.001
    o   new() XXXXX CHARSET XXXXXXXXXXXXXXXXXXXXXXXXXX

XXXX 1.005
    o   encoded-word XXXXXXXXX RFC 2047 X 5 (3) XXXXXXXXX encoded_header_len() XXXXXXXXXXXX

XXXX 1.008
    o   body_encoding() XXXXX "S" XXXXXXXXXXX

    o   body_encode() XXXXX UTF-8 XXXXXXXXXXXXXXXXXXX XXXXXXXXXXX "BASE64" XXXXXXXX"QUOTED-PRINTABLE" XXXXXXXXX

SEE ALSO
Multipurpose Internet Mail Extensions (MIME).

AUTHOR
Hatuka*nezumi - IKEDA Soji <hatuka(at)nezumi.nu>

COPYRIGHT
Copyright (C) 2006-2009 Hatuka*nezumi - IKEDA Soji. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.