.\" Automatically generated by Pod::Man 2.28 (Pod::Simple 3.28)
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sp \" Vertical space (when we can't use .PP)
.if t .sp .5v
.if n .sp
..
.de Vb \" Begin verbatim text
.ft CW
.nf
.ne \\$1
..
.de Ve \" End verbatim text
.ft R
.fi
..
.\" Set up some character translations and predefined strings.  \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
.\" nothing in troff, for use with C<>.
.tr \(*W-
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
.ie n \{\
.    ds -- \(*W-
.    ds PI pi
.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
.    ds L" ""
.    ds R" ""
.    ds C` ""
.    ds C' ""
'br\}
.el\{\
.    ds -- \|\(em\|
.    ds PI \(*p
.    ds L" ``
.    ds R" ''
.    ds C`
.    ds C'
'br\}
.\"
.\" Escape single quotes in literal strings from groff's Unicode transform.
.ie \n(.g .ds Aq \(aq
.el       .ds Aq '
.\"
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD.  Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
.\"
.\" Avoid warning from groff about undefined register 'F'.
.de IX
..
.nr rF 0
.if \n(.g .if rF .nr rF 1
.if (\n(rF:(\n(.g==0)) \{
.    if \nF \{
.        de IX
.        tm Index:\\$1\t\\n%\t"\\$2"
..
.        if !\nF==2 \{
.            nr % 0
.            nr F 2
.        \}
.    \}
.\}
.rr rF
.\"
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear.  Run.  Save yourself.  No user-serviceable parts.
.    \" fudge factors for nroff and troff
.if n \{\
.    ds #H 0
.    ds #V .8m
.    ds #F .3m
.    ds #[ \f1
.    ds #] \fP
.\}
.if t \{\
.    ds #H ((1u-(\\\\n(.fu%2u))*.13m)
.    ds #V .6m
.    ds #F 0
.    ds #[ \&
.    ds #] \&
.\}
.    \" simple accents for nroff and troff
.if n \{\
.    ds ' \&
.    ds ` \&
.    ds ^ \&
.    ds , \&
.    ds ~ ~
.    ds /
.\}
.if t \{\
.    ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
.    ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
.    ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
.    ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
.    ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
.    ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
.\}
.    \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
.    \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
.    \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
\{\
.    ds : e
.    ds 8 ss
.    ds o a
.    ds d- d\h'-1'\(ga
.    ds D- D\h'-1'\(hy
.    ds th \o'bp'
.    ds Th \o'LP'
.    ds ae ae
.    ds Ae AE
.\}
.rm #[ #] #H #V #F C
.\" ========================================================================
.\"
.IX Title "Unicode::Japanese::JA 3pm"
.TH Unicode::Japanese::JA 3pm "2008-08-05" "perl v5.20.0" "User Contributed Perl Documentation"
.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
.nh
.SH "NAME"
Unicode::Japanese::JA \- XXXXXXXXXX
.SH "XX"
.IX Header "XX"
.Vb 2
\& use Unicode::Japanese;
\& use Unicode::Japanese qw(unijp);
\& 
\& # convert utf8 \-> sjis
\& 
\& print Unicode::Japanese\->new($str)\->sjis;
\& print unijp($str)\->sjis; # same as above.
\& 
\& # convert sjis \-> utf8
\& 
\& print Unicode::Japanese\->new($str,\*(Aqsjis\*(Aq)\->get;
\& 
\& # convert sjis (imode_EMOJI) \-> utf8
\& 
\& print Unicode::Japanese\->new($str,\*(Aqsjis\-imode\*(Aq)\->get;
\& 
\& # convert zenkaku (utf8) \-> hankaku (utf8)
\& 
\& print Unicode::Japanese\->new($str)\->z2h\->get;
.Ve
.SH "XX"
.IX Header "XX"
Unicode::Japanese \s-1XXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.SS "\s-1XX\s0"
.IX Subsection "XX"
.IP "\(bu" 2
Unicode::Japanese \s-1XXXXXXXXXUTF\-8 XXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1XS XX/XXXXXXXXXXXXXXXX
XS XXXXXXXXXXXXXXXXX\s0
No-XS \s-1XXXXXXXXXXXXXXXXXXXX
\&\s0(Japanese.pm \s-1XXXXXXXXXXXXXX\s0)X
.IP "\(bu" 2
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1XXXX \s0(DoCoMo i\-modeXKDDI \s-1AU,\s0 Softbank Mobile, \s-1ASTEL\s0 dot-i) \s-1XXXXX\s0
Unicode \s-1XXXXXXXXXXXXXXXXDB XXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1SJIS XX MS\-CP932 XXXXX\s0 Unicode \s-1XXXXXXXXXXXX\s0
.IP "\(bu" 2
Unicode \-> \s-1SJISXXXEUC\-JP/JISX XXXXXXXXSJIS XXXXXXXXXX\s0
&#dddd; \s-1XXXXXXXXX\s0 XXXUnicodeXXXXXXXXXXXXXXX
\&'?'\s-1XXXXX. XX, XXXXXXXXXXXX, XXXXXXXXXXXX\s0'?'\s-1XXXXX.\s0
.IP "\(bu" 2
Perl\-5.8.0 \s-1XXXXXX,\s0 utf8 \s-1XXXXXXXXXXXXX.\s0
utf\-8 `\s-1XXX\s0'X \s-1XXXXX\s0 \fIutf8()\fR \s-1XXXXX, \s0
utf\-8 `\s-1XX\s0'X \s-1XXXXX\s0 \fIgetu()\fR \s-1XXXXXXXXX.\s0
.Sp
\&\fIget()\fR \s-1XXXXXXXXXX\s0 utf\-8 `\s-1XXX\s0'X \s-1XXXXX
\&\s0(\s-1XXXXXXXXXXXXXXXXX\s0).
.Sp
\&\fIsjis()\fR, \fIjis()\fR, \fIutf8()\fR, etc.. \s-1XXXXXXXXXXXXXXX.\s0
new, set, getcode \s-1XXXXXXXXX,\s0 utf8\-flaged/bytes \s-1XXXXXX.\s0
.SH "XXXXXXXX"
.IX Header "XXXXXXXX"
.IP "\(bu" 4
perl 5.10.x, 5.8.x, etc. (5.004 \s-1XX\s0).
.IP "\(bu" 4
(\s-1XXXXOK\s0)
C \s-1XXXXX.
XXXXXXXX XS X\s0 Pure Perl \s-1XXXXXXXXXX.
C XXXXXXXXXXXX,\s0 Unicode::Japanese X
Pure Perl \s-1XXXXXXXXXXXXXXXXXX.\s0
.IP "\(bu" 4
(\s-1XXXXOK\s0)
\&\s-1XXXXX\s0 Test.pm \s-1XX\s0 Test::More.
.PP
\&\s-1XXXXXXXXXXXXXXXXXX.\s0
.SH "XXXX"
.IX Header "XXXX"
.ie n .IP "$s = Unicode::Japanese\->new($str [, $icode [, $encode]])" 4
.el .IP "\f(CW$s\fR = Unicode::Japanese\->new($str [, \f(CW$icode\fR [, \f(CW$encode\fR]])" 4
.IX Item "$s = Unicode::Japanese->new($str [, $icode [, $encode]])"
\&\s-1XXX\s0 Unicode::Japanese \s-1XXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXX\s0\*(L"set\*(R" \s-1XXXXXXXXXXX\s0
.ie n .IP "$s = unijp($str [, $icode [, $encode]])" 4
.el .IP "\f(CW$s\fR = unijp($str [, \f(CW$icode\fR [, \f(CW$encode\fR]])" 4
.IX Item "$s = unijp($str [, $icode [, $encode]])"
Unicode::Janaese\->new(...) \s-1XXX.\s0
.ie n .IP "$s\->set($str [, $icode [, $encode]])" 4
.el .IP "\f(CW$s\fR\->set($str [, \f(CW$icode\fR [, \f(CW$encode\fR]])" 4
.IX Xref "set"
.IX Item "$s->set($str [, $icode [, $encode]])"
.RS 4
.PD 0
.ie n .IP "$str: \s-1XXX\s0" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0" 2
.IX Item "$str: XXX"
.ie n .IP "$icode: \s-1XXXXXXXXXXXXXXXX \s0'utf8'" 2
.el .IP "\f(CW$icode:\fR \s-1XXXXXXXXXXXXXXXX \s0'utf8'" 2
.IX Item "$icode: XXXXXXXXXXXXXXXX 'utf8'"
.ie n .IP "$encode: \s-1XXXXXXXXXXXXXX\s0" 2
.el .IP "\f(CW$encode:\fR \s-1XXXXXXXXXXXXXX\s0" 2
.IX Item "$encode: XXXXXXXXXXXXXX"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXX UTF\-8 XXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXX:\s0
.Sp
.Vb 10
\& auto
\& utf8 ucs2 ucs4
\& utf16\-be utf16\-le utf16
\& utf32\-be utf32\-le utf32
\& sjis cp932 euc euc\-jp jis
\& sjis\-imode sjis\-imode1 sjis\-imode2
\& utf8\-imode utf8\-imode1 utf8\-imode2
\& sjis\-doti sjis\-doti1
\& sjis\-jsky sjis\-jsky1 sjis\-jsky2
\& jis\-jsky  jis\-jsky1  jis\-jsky2
\& utf8\-jsky utf8\-jsky1 utf8\-jsky2
\& sjis\-au sjis\-au1 sjis\-au2
\& jis\-au  jis\-au1  jis\-au2
\& sjis\-icon\-au sjis\-icon\-au1 sjis\-icon\-au2
\& euc\-icon\-au  euc\-icon\-au1  euc\-icon\-au2
\& jis\-icon\-au  jis\-icon\-au1  jis\-icon\-au2
\& utf8\-icon\-au utf8\-icon\-au1 utf8\-icon\-au2
\& ascii binary
.Ve
.Sp
(
\&\s-1XXX.\s0)
.Sp
\&\s-1XXXXXXXXXXXXXXXX\s0'auto' \s-1XXXXXXXXXXXXXX
\&\s0'auto' \fIXXXXXXXXXXXXXgetcode()\fR \s-1XXXXXXX
XXXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXX\s0'base64' \s-1XXXXXXXXX\s0
base64 XXXXXXXXXbase64 \s-1XXXXXXXXX\s0
Unicode::Japanese \s-1XXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
\&\s0'binary' \s-1XXXXXXX\s0
.Sp
sjis-imodeXsjis-dotiXXXXXXXXXX &#dddd; X
\&\s-1XXXXXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXX\s0
.Sp
sjis, utf8 XXXXXXXXXXXXXXXXXsjisX
sjis-auXsjis-doti XXXXXXXXXXXXXXXXXsjis-auX
\&\s-1XXXXXX\s0
.RE
.ie n .IP "$str = $s\->get" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->get" 4
.IX Item "$str = $s->get"
.RS 4
.PD 0
.ie n .IP "$str: \s-1XXX\s0(\s-1UTF\-8\s0)" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0(\s-1UTF\-8\s0)" 2
.IX Item "$str: XXX(UTF-8)"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXX UTF\-8 XXXXXXXXXXX\s0
.Sp
\&\s-1XXX\s0 `\s-1XXX\s0' X \s-1XXXXXX, XXXXXXXXXXXXXXXXX.\s0
.Sp
\&\s-1XXXXXXXXX\s0 \fIutf8()\fR \s-1XXXXX, 
XXXXXXXX\s0 \fIgetu()\fR \s-1XXXXXXXXXXXXXXXXX.\s0
.RE
.ie n .IP "$str = $s\->getu" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->getu" 4
.IX Item "$str = $s->getu"
.RS 4
.PD 0
.ie n .IP "$str: \s-1XXX\s0(\s-1UTF\-8\s0)" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0(\s-1UTF\-8\s0)" 2
.IX Item "$str: XXX(UTF-8)"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXX UTF\-8 XXXXXXXXXXX\s0
.Sp
Perl\-5.8.0 \s-1XXXXXXX,\s0 utf\-8 \s-1XXXXXXX\s0 utf\-8 \s-1XXXXXX
XXXX.\s0
.RE
.ie n .IP "$code = $s\->getcode($str)" 4
.el .IP "\f(CW$code\fR = \f(CW$s\fR\->getcode($str)" 4
.IX Item "$code = $s->getcode($str)"
.RS 4
.PD 0
.ie n .IP "$str: \s-1XXX\s0" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0" 2
.IX Item "$str: XXX"
.ie n .IP "$code: \s-1XXXXXXXXXXX\s0" 2
.el .IP "\f(CW$code:\fR \s-1XXXXXXXXXXX\s0" 2
.IX Item "$code: XXXXXXXXXXX"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXXXXX\s0(\fI\f(CI$str\fI\fR)XXXXXXXXXXXXXXX
.Sp
\&\s-1XXXXXX, XXXX, XXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.Sp
(PurePerlX)
.IP "1." 4
\&\s-1UTF\-32 X BOM\s0 XXXXXutf32 \s-1XXXXXXX\s0
.IP "2." 4
\&\s-1UTF\-16 X BOM\s0 XXXXXutf16 \s-1XXXXXXX\s0
.IP "3." 4
\&\s-1UTF\-32BE\s0 XXXXXXXXXXXutf32\-be \s-1XXXXXXX\s0
.IP "4." 4
\&\s-1UTF\-32LE\s0 XXXXXXXXXXXutf32\-le \s-1XXXXXXX\s0
.IP "5." 4
\&\s-1ESC XX XXX 8\s0 XXXXXXXXXXXXXXXXXXXXXXXascii \s-1XXXXX
XXESC XXXX ASCII XXXX \s0(0x00\-0x1F \s-1XX\s0 0x7F) X ascii \s-1XXXXXXXXX
XX\s0
.IP "6." 4
JISXXXXXXXXXXXXXXXXXXXjis \s-1XXXXXXX\s0
.IP "7." 4
J\-PHONE XXXXXXXXXXXXXsjis-jsky \s-1XXXXXXX\s0
.IP "8." 4
EUC-JP XXXXXXXXXXXXXXeuc \s-1XXXXXXX\s0
.IP "9." 4
\&\s-1SJIS\s0 XXXXXXXXXXXXXXsjis \s-1XXXXXXX\s0
.IP "10." 4
\&\s-1SJIS XXXX\s0 au XXXXXXXXXXXXXXXsjis-au \s-1XXXXXXX\s0
.IP "11." 4
\&\s-1SJIS X\s0 i\-mode XXXXXXXXXXXXXXXsjis-imode \s-1XXXXXXX\s0
.IP "12." 4
\&\s-1SJIS X\s0 dot-i XXXXXXXXXXXXXXXsjis-doti \s-1XXXXXXX\s0
.IP "13." 4
\&\s-1UTF\-8\s0 XXXXXXXXXXXutf8 \s-1XXXXXXX\s0
.IP "14." 4
XXXXXXXXXXXXXXXunknown \s-1XXXXXXX\s0
.RE
.RS 4
.Sp
(\s-1XSX\s0)
.IP "1." 4
\&\s-1UTF\-32 X BOM\s0 XXXXXutf32 \s-1XXXXXXX\s0
.IP "2." 4
\&\s-1UTF\-16 X BOM\s0 XXXXXutf16 \s-1XXXXXXX\s0
.IP "3." 4
\&\s-1XXXXXXXXXX, XXXXXXXXXXXXXXXXXXXXXXXXXX.\s0
.Sp
ascii / euc / sjis / jis / utf8 / utf32\-be / utf32\-le / sjis-jsky /
sjis-imode / sjis-au / sjis-doti
.IP "4." 4
\&\s-1XXXXXXXXXXXXXXX, XXXXXXXXXXXXXX, XXXXXXXX.\s0
.Sp
utf32\-be / utf32\-le / ascii / jis / euc / sjis / sjis-jsky / sjis-imode /
sjis-au / sjis-doti / utf8
.IP "5." 4
XXXXXXXXXXXXXXXunknown \s-1XXXXXXX\s0
.RE
.RS 4
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1UTF\-8 XXXXXXSJISXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1UCS2 XXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1UTF\-16 X BOM XXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
\&\s0 &#dddd; \s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.RE
.RS 4
.Sp
XSXPurePerlXX, \s-1XXXXXXXXXXXXXXXXX, XXXXXXXXXXXXXXXX.
XX,\s0 XXXXXXXXXXXXXsjisXXX, PurePerlXXsjisXXXXXXX
\&\s-1XSXXXXXXXX.\s0 XXXsjis-jskyXXXXXXXXXXXXX. \s-1XX, XX
XXXXXXXXXXXXX,\s0 euc-jpXXXXX, \s-1XXXXXXXXXXXXXXXXX
XXXXXX.\s0
.RE
.ie n .IP "$code = $s\->getcodelist($str)" 4
.el .IP "\f(CW$code\fR = \f(CW$s\fR\->getcodelist($str)" 4
.IX Item "$code = $s->getcodelist($str)"
.RS 4
.PD 0
.ie n .IP "$str: \s-1XXX\s0" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0" 2
.IX Item "$str: XXX"
.ie n .IP "$code: \s-1XXXXXXXXXXX\s0" 2
.el .IP "\f(CW$code:\fR \s-1XXXXXXXXXXX\s0" 2
.IX Item "$code: XXXXXXXXXXX"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXXXXX\s0(\fI\f(CI$str\fI\fR)XXXXXXXXXXXXXXX
.Sp
getcode \s-1XXXX, XXXXXXXXXXXXXXX
XXXXXXX.\s0
.RE
.ie n .IP "$str = $s\->conv($ocode, $encode)" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->conv($ocode, \f(CW$encode\fR)" 4
.IX Item "$str = $s->conv($ocode, $encode)"
.RS 4
.PD 0
.ie n .IP "$ocode: \s-1XXXXX \s0(\s-1XXXXXX\s0)" 2
.el .IP "\f(CW$ocode:\fR \s-1XXXXX \s0(\s-1XXXXXX\s0)" 2
.IX Item "$ocode: XXXXX (XXXXXX)"
.PD
.Vb 10
\& utf8 ucs2 ucs4 utf16
\& sjis cp932 euc euc\-jp jis
\& sjis\-imode sjis\-imode1 sjis\-imode2
\& utf8\-imode utf8\-imode1 utf8\-imode2
\& sjis\-doti sjis\-doti1
\& sjis\-jsky sjis\-jsky1 sjis\-jsky2
\& jis\-jsky  jis\-jsky1  jis\-jsky2
\& utf8\-jsky utf8\-jsky1 utf8\-jsky2
\& sjis\-au sjis\-au1 sjis\-au2
\& jis\-au  jis\-au1  jis\-au2
\& sjis\-icon\-au sjis\-icon\-au1 sjis\-icon\-au2
\& euc\-icon\-au  euc\-icon\-au1  euc\-icon\-au2
\& jis\-icon\-au  jis\-icon\-au1  jis\-icon\-au2
\& utf8\-icon\-au utf8\-icon\-au1 utf8\-icon\-au2
\& binary
.Ve
.Sp
(
\&\s-1XXX.\s0)
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.ie n .IP "$encode: \s-1XXXXXXXXXXXXXX\s0" 2
.el .IP "\f(CW$encode:\fR \s-1XXXXXXXXXXXXXX\s0" 2
.IX Item "$encode: XXXXXXXXXXXXXX"
.PD 0
.ie n .IP "$str: \s-1XXX\s0" 2
.el .IP "\f(CW$str:\fR \s-1XXX\s0" 2
.IX Item "$str: XXX"
.RE
.RS 4
.PD
.Sp
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXXXXXXXX\s0'base64' \s-1XXXXXXXXX\s0
base64 XXXXXXXXXbase64 \s-1XXXXXXXX
XXXXXXXXXX\s0
.Sp
perl\-5.8.0 \s-1XXXXXX, XXX\s0 utf\-8 \s-1XXXXXXXXXXXXXXXXX.\s0
.RE
.ie n .IP "$s\->tag2bin" 4
.el .IP "\f(CW$s\fR\->tag2bin" 4
.IX Item "$s->tag2bin"
\&\s-1XXXXXXXXX\s0 &#dddd; \s-1XXXXXXXXXXXXXXXXXXXXXXXXX\s0
.ie n .IP "$s\->z2h" 4
.el .IP "\f(CW$s\fR\->z2h" 4
.IX Item "$s->z2h"
\&\s-1XXXXXXXXXXXX\s0
.ie n .IP "$s\->h2z" 4
.el .IP "\f(CW$s\fR\->h2z" 4
.IX Item "$s->h2z"
\&\s-1XXXXXXXXXXXX\s0
.ie n .IP "$s\->hira2kata" 4
.el .IP "\f(CW$s\fR\->hira2kata" 4
.IX Item "$s->hira2kata"
\&\s-1XXXXXXXXXXXXXXXX\s0
.ie n .IP "$s\->kata2hira" 4
.el .IP "\f(CW$s\fR\->kata2hira" 4
.IX Item "$s->kata2hira"
\&\s-1XXXXXXXXXXXXXXXX\s0
.ie n .IP "$str = $s\->jis" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->jis" 4
.IX Item "$str = $s->jis"
\&\f(CW$str:\fR \s-1JIS XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX JISXISO\-2022\-JPX XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->euc" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->euc" 4
.IX Item "$str = $s->euc"
\&\f(CW$str:\fR euc-jp \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 EUC-JP \s-1XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->utf8" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->utf8" 4
.IX Item "$str = $s->utf8"
\&\f(CW$str:\fR utf\-8 \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX UTF\-8 XXXXXXXXXXX\s0
.Sp
perl\-5.8.0 \s-1XXXXXXX, XXXXXXXXX.\s0
.ie n .IP "$str = $s\->ucs2" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->ucs2" 4
.IX Item "$str = $s->ucs2"
\&\f(CW$str:\fR ucs2 \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX UCS2 XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->ucs4" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->ucs4" 4
.IX Item "$str = $s->ucs4"
\&\f(CW$str:\fR ucs4 \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX UCS4 XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->utf16" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->utf16" 4
.IX Item "$str = $s->utf16"
\&\f(CW$str:\fR ucs\-16 \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX UTF\-16 XXXXXXXXXXX
BOMXXXXXXX
XXXXXXXXXXXXXXXXXX\s0
.ie n .IP "$str = $s\->sjis" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis" 4
.IX Item "$str = $s->sjis"
\&\f(CW$str:\fR sjis \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX SJISXMS\-CP932X XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->sjis_imode" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_imode" 4
.IX Item "$str = $s->sjis_imode"
\&\f(CW$str:\fR sjis/imodeXXX \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 i\-mode \s-1XXXXX SJIS XXXXXXXXXXX\s0
XXXimodeXXXXXXXX.
.ie n .IP "$str = $s\->sjis_imode1" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_imode1" 4
.IX Item "$str = $s->sjis_imode1"
\&\f(CW$str:\fR sjis/imode \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 i\-mode \s-1XXXXX SJIS XXXXXXXXXXX
XXXXXXXXXXXXX.\s0
.ie n .IP "$str = $s\->sjis_imode2" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_imode2" 4
.IX Item "$str = $s->sjis_imode2"
\&\f(CW$str:\fR sjis/imode \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 i\-mode \s-1XXXXX SJIS XXXXXXXXXXX
XXXXX, XXXXXXXXXX.\s0
.ie n .IP "$str = $s\->sjis_doti" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_doti" 4
.IX Item "$str = $s->sjis_doti"
\&\f(CW$str:\fR sjis/dot\-i \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 dot-i \s-1XXXXX SJIS XXXXXXXXXXX\s0
.ie n .IP "$str = $s\->sjis_jsky" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_jsky" 4
.IX Item "$str = $s->sjis_jsky"
\&\f(CW$str:\fR sjis/j\-sky \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 j\-sky \s-1XXXXX SJIS XXXXXXXXXXX\s0
XXXj\-skyXXX(\s-1VERSION 0.15 XX,\s0 jsky2)XXXXX.
.ie n .IP "$str = $s\->sjis_jsky1" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_jsky1" 4
.IX Item "$str = $s->sjis_jsky1"
\&\f(CW$str:\fR sjis/j\-sky \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 j\-sky \s-1XXXXX SJIS XXXXXXXXXXX\s0
Page 1X3 \s-1XXXXXXXXXXX.\s0
.ie n .IP "$str = $s\->sjis_jsky" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_jsky" 4
.IX Item "$str = $s->sjis_jsky"
\&\f(CW$str:\fR sjis/j\-sky \s-1XXX XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX\s0 j\-sky \s-1XXXXX SJIS XXXXXXXXXXX\s0
Page 1X6 \s-1XXXXXXXXX.\s0
.ie n .IP "$str = $s\->sjis_icon_au" 4
.el .IP "\f(CW$str\fR = \f(CW$s\fR\->sjis_icon_au" 4
.IX Item "$str = $s->sjis_icon_au"
\&\f(CW$str:\fR sjis/AU iconXX \s-1XXXXXXXXXXXXXXX\s0
.Sp
\&\s-1XXXX AU XXXXX SJIS XXXXXXXXXXX\s0
.ie n .IP "$str_arrayref = $s\->strcut($len)" 4
.el .IP "\f(CW$str_arrayref\fR = \f(CW$s\fR\->strcut($len)" 4
.IX Item "$str_arrayref = $s->strcut($len)"
.RS 4
.PD 0
.ie n .IP "$len: \s-1XXXXXXX\s0(\s-1XXXX\s0)" 2
.el .IP "\f(CW$len:\fR \s-1XXXXXXX\s0(\s-1XXXX\s0)" 2
.IX Item "$len: XXXXXXX(XXXX)"
.ie n .IP "$str_arrayref: \s-1XXX\s0" 2
.el .IP "\f(CW$str_arrayref:\fR \s-1XXX\s0" 2
.IX Item "$str_arrayref: XXX"
.RE
.RS 4
.PD
.Sp
\&\fI\f(CI$len\fI\fR\s-1XXXXXXXXX\s0(\s-1XX\s0)XXXXXXXXXXXXXXXX
.Sp
\&\s-1XXXXXXX,\s0 utf\-8 XXXXXXXutf\-8XXXXX.
.RE
.ie n .IP "$len = $s\->strlen" 4
.el .IP "\f(CW$len\fR = \f(CW$s\fR\->strlen" 4
.IX Item "$len = $s->strlen"
\&\f(CW$len:\fR \s-1XXXXXXX\s0
.Sp
\&\s-1UTF\-8 XXXXXX\s0 \fIlength()\fR \s-1XXXXXXXXXXXXXXXXX 3 XXXXXXXXXXX
XXXXXXXXXXXXXXXX SJIS XXXXXXXXXXXXXXXXXX 2 XXXXXX\s0
.ie n .IP "$s\->join_csv(@values);" 4
.el .IP "\f(CW$s\fR\->join_csv(@values);" 4
.IX Item "$s->join_csv(@values);"
\&\f(CW@values:\fR \s-1XXXXX\s0
.Sp
\&\s-1XXX CSV XXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXX\s0(\*(L"\en\*(R")XXXXXXXX
.ie n .IP "@values = $s\->split_csv;" 4
.el .IP "\f(CW@values\fR = \f(CW$s\fR\->split_csv;" 4
.IX Item "@values = $s->split_csv;"
\&\f(CW@values:\fR \s-1XXXXX\s0
.Sp
\&\s-1XXXXXXXXXXXXXXXXXX CSV XXXXXXXXXXXXXX
XXXXXXXXXXX\s0(\*(L"\en\*(R")XXXXXXXXXXXXXXXX
.Sp
\&\s-1XXX\s0 binary \s-1XXXXX\s0 utf\-8 \s-1XXXXXXXX.\s0
binary \s-1XXXXXXXXXXXXXXX.\s0
.SH "XXXXXXXXXXXXXXXXX"
.IX Header "XXXXXXXXXXXXXXXXX"
.Vb 10
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |encoding       | in | out | guess |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |auto           : OK : \-\-  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |utf8           : OK : OK  | OK    |
\& |ucs2           : OK : OK  | \-\-\-\-\- |
\& |ucs4           : OK : OK  | \-\-\-\-\- |
\& |utf16\-be       : OK : \-\-  | \-\-\-\-\- |
\& |utf16\-le       : OK : \-\-  | \-\-\-\-\- |
\& |utf16          : OK : OK  | OK(#) |
\& |utf32\-be       : OK : \-\-  | OK    |
\& |utf32\-le       : OK : \-\-  | OK    |
\& |utf32          : OK : \-\-  | OK(#) |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |sjis           : OK : OK  | OK    |
\& |cp932          : OK : OK  | \-\-\-\-\- |
\& |euc            : OK : OK  | OK    |
\& |euc\-jp         : OK : OK  | \-\-\-\-\- |
\& |jis            : OK : OK  | OK    |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |sjis\-imode     : OK : OK  | OK    |
\& |sjis\-imode1    : OK : OK  | \-\-\-\-\- |
\& |sjis\-imode2    : OK : OK  | \-\-\-\-\- |
\& |utf8\-imode     : OK : OK  | \-\-\-\-\- |
\& |utf8\-imode1    : OK : OK  | \-\-\-\-\- |
\& |utf8\-imode2    : OK : OK  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |sjis\-doti      : OK : OK  | OK    |
\& |sjis\-doti1     : OK : OK  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |sjis\-jsky      : OK : OK  | OK    |
\& |sjis\-jsky1     : OK : OK  | \-\-\-\-\- |
\& |sjis\-jsky2     : OK : OK  | \-\-\-\-\- |
\& |jis\-jsky       : OK : OK  | \-\-\-\-\- |
\& |jis\-jsky1      : OK : OK  | \-\-\-\-\- |
\& |jis\-jsky2      : OK : OK  | \-\-\-\-\- |
\& |utf8\-jsky      : OK : OK  | \-\-\-\-\- |
\& |utf8\-jsky1     : OK : OK  | \-\-\-\-\- |
\& |utf8\-jsky2     : OK : OK  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |sjis\-au        : OK : OK  | OK    |
\& |sjis\-au1       : OK : OK  | \-\-\-\-\- |
\& |sjis\-au2       : OK : OK  | \-\-\-\-\- |
\& |jis\-au         : OK : OK  | \-\-\-\-\- |
\& |jis\-au1        : OK : OK  | \-\-\-\-\- |
\& |jis\-au2        : OK : OK  | \-\-\-\-\- |
\& |sjis\-icon\-au   : OK : OK  | \-\-\-\-\- |
\& |sjis\-icon\-au1  : OK : OK  | \-\-\-\-\- |
\& |sjis\-icon\-au2  : OK : OK  | \-\-\-\-\- |
\& |euc\-icon\-au    : OK : OK  | \-\-\-\-\- |
\& |euc\-icon\-au1   : OK : OK  | \-\-\-\-\- |
\& |euc\-icon\-au2   : OK : OK  | \-\-\-\-\- |
\& |jis\-icon\-au    : OK : OK  | \-\-\-\-\- |
\& |jis\-icon\-au1   : OK : OK  | \-\-\-\-\- |
\& |jis\-icon\-au2   : OK : OK  | \-\-\-\-\- |
\& |utf8\-icon\-au   : OK : OK  | \-\-\-\-\- |
\& |utf8\-icon\-au1  : OK : OK  | \-\-\-\-\- |
\& |utf8\-icon\-au2  : OK : OK  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& |ascii          : OK : \-\-  | OK    |
\& |binary         : OK : OK  | \-\-\-\-\- |
\& +\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-+\-\-\-\-+\-\-\-\-\-+\-\-\-\-\-\-\-+
\& (#): guessed when it has bom.
.Ve
.SS "\s-1XXXXXXXX\s0"
.IX Subsection "XXXXXXXX"
.Vb 10
\& 1.  utf32 (#)
\& 2.  utf16 (#)
\& 3.  utf32\-be
\& 4.  utf32\-le
\& 5.  ascii
\& 6.  jis
\& 7.  sjis\-jsky (pp)
\& 8.  euc
\& 9.  sjis
\& 10. sjis\-jsky (xs)
\& 11. sjis\-au
\& 12. sjis\-imode
\& 13. sjis\-doti
\& 14. utf8
\& 15. unknown
.Ve
.SH "DESCRIPTION OF UNICODE MAPPING"
.IX Header "DESCRIPTION OF UNICODE MAPPING"
Unicode \s-1XXXXXXXXXXXXXXXXXXXX\s0
.IP "Shift_JIS" 2
.IX Item "Shift_JIS"
\&\s-1MS\-CP932 XXX\s0 Unicode \s-1XXXXXXXXXXXX
XXXXXXXXXXXXXURLXXXXXXXXXXXX\s0
.Sp
<ftp://ftp.unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/CP932.TXT>
.Sp
Unicode \s-1XX SJIS XXXXXXXXXXXXXXXXXXXXXXXXX
XXXXX\s0 &#dddd; \s-1XXXXXXXXX
XXXXXXXXXXX\s0?XXXXXXXXX
.Sp
\&\s-1XXXXXXXX SJIS XXXXXXXXXXXXXXXXXXXXXX\s0?XXXXXXXXX
.IP "\s-1EUC\-JP/ISO\-2022\-JP\s0" 2
.IX Item "EUC-JP/ISO-2022-JP"
XXSJISXXXXXXXXXXXUnicode \s-1XXXXXXXXXX
XXXXXSJIS XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX\s0
.IP "DoCoMo i\-mode" 2
.IX Item "DoCoMo i-mode"
F800 \- F9FF \s-1XXXXXXXXXXXXXXXXXXU+0FF800 \- U+0FF9FF
XXXXXXXXXXXXX\s0
.IP "\s-1ASTEL\s0 dot-i" 2
.IX Item "ASTEL dot-i"
F000 \- F4FF \s-1XXXXXXXXXXXXXXXXXXU+0FF000 \- U+0FF4FF
XXXXXXXXXXXXX\s0
.IP "J\-PHONE J\-SKY" 2
.IX Item "J-PHONE J-SKY"
J\-SKY \s-1XXXXXXXXXXXXXXXX \s0\*(L"\ee\e$\*(R" \s-1XXXXXXX1XXXXX
1XXXXXXX2XXXXX\s0\*(L"\ex0f\*(R"\s-1XXXXXXX
1XXXXXXXXXXXXXXXXX2XXXXXXXXXXXXXXXX
XXXXXXXXXXXX\s0
.Sp
\&\s-1XX1XXXXX2XXXXXXXX1XXXXXXXX4500 \- 47FF XXXXX
U+0FFB00 \- U+0FFDFF XXXXXXXXXXXXX\s0
.Sp
Unicode::Japanese XXXUnicode \s-1XX J\-SKY XXXXXXXXXXXXXX
1XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\s-1AU\s0" 2
.IX Item "AU"
\&\s-1XXXXXXXXXXXXU+0FF500 \- U+0FF6FF XXXXXXXXXXXXX\s0
.SH "PurePerl mode"
.IX Header "PurePerl mode"
.Vb 1
\&   use Unicode::Japanese qw(PurePerl);
.Ve
.PP
use \s-1XXXXX \s0\f(CW\*(AqPurePerl\*(Aq\fR \s-1XXXXXXX, 
XSXXXXXXXXXXXXXXXXXX.\s0
.SH "XX"
.IX Header "XX"
\&\s-1XXXXXX \s0\f(CW\*(C`bug\-unicode\-japanese at rt.cpan.org\*(C'\fR \s-1XX
XXXXXXXX. XXXX
\&\s0<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Unicode\-Japanese>.
\&\s-1XXX\s0 web \s-1XXXXXXXXXXXXXXXXXX.
XXXXXXXXXX, XXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXX.\s0
.IP "\(bu" 2
EUC-JPXJIS \s-1XXXXXSJIS XXXXXXXX UTF\-8 XXXXXXXXX
SJIS XXXXXXXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
\&\s-1XSXXXXXXXXXXEUC\-JPXSJIS\s0(\s-1XXXXX\s0)XXXXXXXXX
\&\ee XXXXXXXEUC-JPXSJIS \s-1XXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXX\s0
.IP "\(bu" 2
Japanese.pm \s-1XXXXXXXXXXXXXXXXXXFTP X ASCII XXXX
XXXXXXXXXXXXXXX\s0
.SH "XXXX"
.IX Header "XXXX"
\&\s-1XXXXXXXXXXXXXXX\s0 perldoc \s-1XXXXXXXXXXXXXX.\s0
.PP
.Vb 1
\&    perldoc Unicode::Japanese
.Ve
.PP
\&\s-1XX, XXXXXXXXXXXXXXXX:\s0
.IP "\(bu" 4
AnnoCPAN: Annotated \s-1CPAN\s0 documentation
.Sp
<http://annocpan.org/dist/Unicode\-Japanese>
.IP "\(bu" 4
\&\s-1CPAN\s0 Ratings
.Sp
<http://cpanratings.perl.org/d/Unicode\-Japanese>
.IP "\(bu" 4
\&\s-1RT: CPAN\s0's request tracker
.Sp
<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Unicode\-Japanese>
.IP "\(bu" 4
Search \s-1CPAN\s0
.Sp
<http://search.cpan.org/dist/Unicode\-Japanese>
.SH "CREDITS"
.IX Header "CREDITS"
Thanks very much to:
.PP
\&\s-1NAKAYAMA\s0 Nao
.PP
\&\s-1SUGIURA\s0 Tatsuki & Debian \s-1JP\s0 Project
.SH "XXXXXXXXXX"
.IX Header "XXXXXXXXXX"
Copyright 2001\-2008
\&\s-1SANO\s0 Taku (\s-1SAWATARI\s0 Mikage) and \s-1YAMASHINA\s0 Hio,
all rights reserved.
.PP
\&\s-1XXXXXXXXXXXXXXXXXXXXXXXX\s0 Perl \s-1XXX
XXXXXX XXXXXXXXXXXXXXXXXXX.\s0