Encode/ISO2022/JISCompatible.esr

#?PESRC/1.0
Name:
        ISO2022::JISCompatible
ShortDescription:
        An Encode module of ISO/IEC 2022
        based compatible coding systems for Japanese
POD:DESCRIPTION:
        Due to the historical reason, some of current
        implementions of JIS coded character sets support
        pairs of same characters dupplicately, with
        halfwidth/fullwidth property.
        
        Although this situation is undesirable, we can't ignore
        such historical implementions and latest JIS coded
        character set standards admire such dupulicate
        encoding to and only to "keep compatibility with
        current practice."
        
        This module provides encoder and decoder for such
        coding systems that comform to JIS and that based
        on ISO/IEC 2022 structure.
        
        Those coding systems SHOULD not be used for new
        implemention or new data.  They may not comform
        to future version of JIS or other standards.

{
Name:
        iso-2022-jp-fullwidth
Encode:
        use:Encode::ISO2022::SevenBit
        =>ucs_to_ascii ucs_to_jisx0208_1998_irv ucs_to_jisx0208_1978_to_irv ucs_to_jisx0201_latin
        ->iso-2022-jp
Decode:
        use:Encode::ISO2022::SevenBit
        <-iso-2022-jp
        <=jisx0208_1983_irv_to_ucs jisx0208_1978_irv_to_ucs jisx0201_latin_to_ucs jisx0201_katakana_to_ucs jisx0212_1990_irv_to_ucs jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0208_1997_irv_to_ucs
Description:
        ISO/IEC 2022 based 7-bit encoding for Japanese,
        ASCII + JIS X 0201 + JIS X 0208-1978 + JIS X 0208-1983.
        Some characters defined in JIS X 0208 are mapped to FULLWIDTH
        area of UCS as specified in JIS X 0208:1997.
        
        This encoding is a "compatible" version of
        C<iso-2022-jp> defined in Encode::ISO2022::SevenBit.
        
        When decoding, mapping tables from coded character
        sets listed below to UCS are also loaded to restore
        incorrectly labeled data.
        
                JIS X 0201 Katakana coded character set,
                JIS X 0212-1990, JIS X 0213:2000
        
        Note that for Windows user, Encode::ISO2022::CP932
        may be useful to try to restore broken "ISO-2022-JP"
        data.
}

{
Name:
        iso-2022-jp-3-fullwidth
Encode:
        use:Encode::ISO2022::SevenBit
        =>ucs_to_ascii ucs_to_jisx0213_2000_1_irv ucs_to_jisx0213_2000_2
        ->iso-2022-jp-3
Decode:
        use:Encode::ISO2022::SevenBit
        <-iso-2022-jp-3
        <=jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0208_1997_irv_to_ucs
Description:
        ISO/IEC 2022 based 7-bit encoding for Japanese,
        ISO/IEC 646 IRV + JIS X 0213:2000.  Some characters
        defined in JIS X 0213 are mapped to FULLWIDTH
        area of UCS as specified in JIS X 0213:2000.
        
        This encoding is a "compatible" version of
        C<iso-2022-jp-3> defined in Encode::ISO2022::SevenBit.
}

{
Name:
        euc-jp-1997-fullwidth
Alias:
        euc-japan-1997-fullwidth euc-jp-1990-fullwidth euc-japan-1990-fullwidth
Encode:
        =>ucs_to_ascii ucs_to_jisx0208_1997_irv ucs_to_jisx0212_1990_irv ucs_to_jisx0201_katakana_hw
        ->euc-jp-1997
Decode:
        <-euc-jp-1997
        <=jisx0208_1997_irv_to_ucs jisx0212_1990_irv_to_ucs jisx0201_katakana_hw_to_ucs
Description:
        EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese,
        ISO/IEC 646 IRV + JIS X 0208:1997 + JIS X 0212-1990
        + JIS X 0201:1997 Katakana.  Some characters defined
        in JIS X 0208 and all characters defined in JIS X 0201
        are mapped to FULLWIDTH or HALFWIDTH characters of UCS
        as specified by JIS X 0221-1995 and JIS X 0208:1997.
        
        This encoding is a "compatible" version of
        C<euc-jp-1997> defined in Encode::ISO2022::EightBit.
}

{
Name:
        euc-jisx0213-fullwidth
Alias:
        euc-japan-2000-fullwidth euc-jp-2000-fullwidth
Encode:
        use:Encode::ISO2022::EightBit
        =>ucs_to_ascii ucs_to_jisx0213_2000_1_irv ucs_to_jisx0213_2000_2 ucs_to_jisx0201_katakana_hw
        ->euc-jisx0213
Decode:
        use:Encode::ISO2022::EightBit
        <-euc-jisx0213
        <=jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0201_katakana_hw_to_ucs
Description:
        EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese,
        ISO/IEC 646 IRV + JIS X 0213:2000 + JIS X 0201:1997
        Katakana.  Some characters defined in JIS X 0213 and
        all characters defined in JIS X 0201 are mapped to
        FULLWIDTH or HALFWIDTH characters of UCS as specified
        by JIS X 0213:2000.
        
        This encoding is a "compatible" version of
        C<euc-jisx0213> defined in Encode::ISO2022::EightBit.
}

POD:EXAMPLE:
          use %%MYSELF%%;
          while (<>) {
            print "FW->  : ". Encode::encode ('euc-jp-1997', Encode::decode ('euc-jp-1997-fullwidth', $_));
            print "FW->FW: ". Encode::encode ('euc-jp-1997-fullwidth', Encode::decode ('euc-jp-1997-fullwidth', $_));
            print "  ->FW: ". Encode::encode ('euc-jp-1997-fullwidth', Encode::decode ('euc-jp-1997', $_));
            print "  ->  : ". Encode::encode ('euc-jp-1997', Encode::decode ('euc-jp-1997', $_));
          }
}

POD:SEE ALSO:
        %%ReferenceJISX0212_1995%%
        
        %%ReferenceJISX0208_1997%%
        
        %%ReferenceJISX0213_2000%%
        
        %%ReferenceRFC1468%%
        
        L<Encode::ISO2022::EightBit>

POD:LICENSE:
        Copyright %%YEAR%% Wakaba <w@suika.fam.cx>
        
        %%PerlLicense%%
1	wakaba	1.1	#?PESRC/1.0
2			Name:
3			ISO2022::JISCompatible
4			ShortDescription:
5			An Encode module of ISO/IEC 2022
6			based compatible coding systems for Japanese
7			POD:DESCRIPTION:
8			Due to the historical reason, some of current
9			implementions of JIS coded character sets support
10			pairs of same characters dupplicately, with
11			halfwidth/fullwidth property.
12
13	wakaba	1.2	Although this situation is undesirable, we can't ignore
14	wakaba	1.1	such historical implementions and latest JIS coded
15			character set standards admire such dupulicate
16			encoding to and only to "keep compatibility with
17			current practice."
18
19			This module provides encoder and decoder for such
20			coding systems that comform to JIS and that based
21			on ISO/IEC 2022 structure.
22
23			Those coding systems SHOULD not be used for new
24			implemention or new data. They may not comform
25			to future version of JIS or other standards.
26
27			{
28			Name:
29	wakaba	1.2	iso-2022-jp-fullwidth
30			Encode:
31			use:Encode::ISO2022::SevenBit
32			=>ucs_to_ascii ucs_to_jisx0208_1998_irv ucs_to_jisx0208_1978_to_irv ucs_to_jisx0201_latin
33			->iso-2022-jp
34			Decode:
35			use:Encode::ISO2022::SevenBit
36			<-iso-2022-jp
37			<=jisx0208_1983_irv_to_ucs jisx0208_1978_irv_to_ucs jisx0201_latin_to_ucs jisx0201_katakana_to_ucs jisx0212_1990_irv_to_ucs jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0208_1997_irv_to_ucs
38			Description:
39			ISO/IEC 2022 based 7-bit encoding for Japanese,
40			ASCII + JIS X 0201 + JIS X 0208-1978 + JIS X 0208-1983.
41			Some characters defined in JIS X 0208 are mapped to FULLWIDTH
42			area of UCS as specified in JIS X 0208:1997.
43
44			This encoding is a "compatible" version of
45			C<iso-2022-jp> defined in Encode::ISO2022::SevenBit.
46
47			When decoding, mapping tables from coded character
48			sets listed below to UCS are also loaded to restore
49			incorrectly labeled data.
50
51			JIS X 0201 Katakana coded character set,
52			JIS X 0212-1990, JIS X 0213:2000
53
54			Note that for Windows user, Encode::ISO2022::CP932
55			may be useful to try to restore broken "ISO-2022-JP"
56			data.
57			}
58
59			{
60			Name:
61	wakaba	1.1	iso-2022-jp-3-fullwidth
62			Encode:
63			use:Encode::ISO2022::SevenBit
64			=>ucs_to_ascii ucs_to_jisx0213_2000_1_irv ucs_to_jisx0213_2000_2
65			->iso-2022-jp-3
66			Decode:
67			use:Encode::ISO2022::SevenBit
68			<-iso-2022-jp-3
69			<=jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0208_1997_irv_to_ucs
70			Description:
71			ISO/IEC 2022 based 7-bit encoding for Japanese,
72			ISO/IEC 646 IRV + JIS X 0213:2000. Some characters
73	wakaba	1.2	defined in JIS X 0213 are mapped to FULLWIDTH
74			area of UCS as specified in JIS X 0213:2000.
75	wakaba	1.1
76			This encoding is a "compatible" version of
77			C<iso-2022-jp-3> defined in Encode::ISO2022::SevenBit.
78			}
79
80			{
81			Name:
82			euc-jp-1997-fullwidth
83			Alias:
84			euc-japan-1997-fullwidth euc-jp-1990-fullwidth euc-japan-1990-fullwidth
85			Encode:
86			=>ucs_to_ascii ucs_to_jisx0208_1997_irv ucs_to_jisx0212_1990_irv ucs_to_jisx0201_katakana_hw
87			->euc-jp-1997
88			Decode:
89			<-euc-jp-1997
90			<=jisx0208_1997_irv_to_ucs jisx0212_1990_irv_to_ucs jisx0201_katakana_hw_to_ucs
91			Description:
92			EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese,
93			ISO/IEC 646 IRV + JIS X 0208:1997 + JIS X 0212-1990
94			+ JIS X 0201:1997 Katakana. Some characters defined
95			in JIS X 0208 and all characters defined in JIS X 0201
96			are mapped to FULLWIDTH or HALFWIDTH characters of UCS
97			as specified by JIS X 0221-1995 and JIS X 0208:1997.
98
99			This encoding is a "compatible" version of
100			C<euc-jp-1997> defined in Encode::ISO2022::EightBit.
101			}
102
103			{
104			Name:
105			euc-jisx0213-fullwidth
106			Alias:
107			euc-japan-2000-fullwidth euc-jp-2000-fullwidth
108			Encode:
109			use:Encode::ISO2022::EightBit
110			=>ucs_to_ascii ucs_to_jisx0213_2000_1_irv ucs_to_jisx0213_2000_2 ucs_to_jisx0201_katakana_hw
111			->euc-jisx0213
112			Decode:
113			use:Encode::ISO2022::EightBit
114			<-euc-jisx0213
115			<=jisx0213_2000_1_irv_to_ucs jisx0213_2000_2_to_ucs jisx0201_katakana_hw_to_ucs
116			Description:
117			EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese,
118			ISO/IEC 646 IRV + JIS X 0213:2000 + JIS X 0201:1997
119			Katakana. Some characters defined in JIS X 0213 and
120			all characters defined in JIS X 0201 are mapped to
121			FULLWIDTH or HALFWIDTH characters of UCS as specified
122			by JIS X 0213:2000.
123
124			This encoding is a "compatible" version of
125			C<euc-jisx0213> defined in Encode::ISO2022::EightBit.
126			}
127
128			POD:EXAMPLE:
129			use %%MYSELF%%;
130			while (<>) {
131			print "FW-> : ". Encode::encode ('euc-jp-1997', Encode::decode ('euc-jp-1997-fullwidth', $_));
132			print "FW->FW: ". Encode::encode ('euc-jp-1997-fullwidth', Encode::decode ('euc-jp-1997-fullwidth', $_));
133			print " ->FW: ". Encode::encode ('euc-jp-1997-fullwidth', Encode::decode ('euc-jp-1997', $_));
134			print " -> : ". Encode::encode ('euc-jp-1997', Encode::decode ('euc-jp-1997', $_));
135			}
136			}
137
138			POD:SEE ALSO:
139	wakaba	1.2	%%ReferenceJISX0212_1995%%
140
141			%%ReferenceJISX0208_1997%%
142
143			%%ReferenceJISX0213_2000%%
144
145			%%ReferenceRFC1468%%
146	wakaba	1.1
147			L<Encode::ISO2022::EightBit>
148
149			POD:LICENSE:
150			Copyright %%YEAR%% Wakaba <w@suika.fam.cx>
151
152			%%PerlLicense%%