/[suikacvs]/test/oldencodeutils/lib/Encode/ISO2022/EightBit.pm
Suika

Diff of /test/oldencodeutils/lib/Encode/ISO2022/EightBit.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by wakaba, Mon Sep 16 02:17:48 2002 UTC revision 1.4 by wakaba, Fri Oct 4 23:58:04 2002 UTC
# Line 81  sub __2022__common ($) { Line 81  sub __2022__common ($) {
81  package Encode::ISO2022::EightBit::EUCJapan;  package Encode::ISO2022::EightBit::EUCJapan;
82  use vars qw/@ISA/;  use vars qw/@ISA/;
83  push @ISA, 'Encode::ISO2022::EightBit';  push @ISA, 'Encode::ISO2022::EightBit';
84  __PACKAGE__->Define (qw/euc-japan euc-japan-1990 euc-jp eucjp euc_jp x-euc-jp  __PACKAGE__->Define (qw/euc-japan euc-japan-1990 euc-jp euc-j eucjp euc_jp x-euc-jp
85    Extended_UNIX_Code_Packed_Format_for_Japanese csEUCPkdFmtJapanese    x-eucjp eucjis euc-jis eucj Extended_UNIX_Code_Packed_Format_for_Japanese csEUCPkdFmtJapanese
86    japanese-iso-8bit cp51932 japanese_euc    japanese-iso-8bit cp51932 japanese_euc
87        ajec eucjp-open  ibm-eucjp cp33722 33722  sdeckanji/);        ajec eucjp-open  ibm-eucjp cp33722 33722  sdeckanji/);
88    
# Line 90  __PACKAGE__->Define (qw/euc-japan euc-ja Line 90  __PACKAGE__->Define (qw/euc-japan euc-ja
90    
91  EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese.  EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese.
92  (Alias: euc-japan-1990 (emacsen), euc-jp (IANA),  (Alias: euc-japan-1990 (emacsen), euc-jp (IANA),
93  eucjp (locale), euc_jp, x-euc-jp,  euc-j, eucjp (X), euc_jp, eucj, x-eucjp, x-euc-jp, eucjis, euc-jis,
94  extended_unix_code_packed_format_for_japanese (IANA),  extended_unix_code_packed_format_for_japanese (IANA),
95  cseucpkdfmtjapanese (IANA), japanese-iso-8bit (emacsen),  cseucpkdfmtjapanese (IANA), japanese-iso-8bit (emacsen),
96  cp51932 (M$), japanese_euc)  cp51932 (M$), japanese_euc)
# Line 108  sub __2022__common ($) { Line 108  sub __2022__common ($) {
108  package Encode::ISO2022::EightBit::EUCJISX0213;  package Encode::ISO2022::EightBit::EUCJISX0213;
109  use vars qw/@ISA/;  use vars qw/@ISA/;
110  push @ISA, 'Encode::ISO2022::EightBit';  push @ISA, 'Encode::ISO2022::EightBit';
111  __PACKAGE__->Define (qw/euc-jisx0213 x-euc-jisx0213  __PACKAGE__->Define (qw/euc-jisx0213 x-euc-jisx0213 euc_jisx0213 eucjp0213
112        x-euc-jisx0213-packed  deckanji2000/);   euc-jp-3     x-euc-jisx0213-packed  deckanji2000/);
113    
114  =item euc-jisx0213  =item euc-jisx0213
115    
116  EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese  EUC (ISO/IEC 2022 based 8-bit encoding) for Japanese
117  with JIS X 0213:2000, defined by JIS X 0213:2000.  with JIS X 0213:2000, defined by JIS X 0213:2000.
118  (Alias: x-euc-jisx0213)  (Alias: x-euc-jisx0213, euc_jisx0213, eucjp0213, euc-jp-3)
119    
120  =cut  =cut
121    
# Line 148  sub __2022__common ($) { Line 148  sub __2022__common ($) {
148  package Encode::ISO2022::EightBit::EUCCHINA;  package Encode::ISO2022::EightBit::EUCCHINA;
149  use vars qw/@ISA/;  use vars qw/@ISA/;
150  push @ISA, 'Encode::ISO2022::EightBit';  push @ISA, 'Encode::ISO2022::EightBit';
151  __PACKAGE__->Define (qw/euc-china euc-cn cn-gb cn-gb-2312 chinese-iso-8bit  __PACKAGE__->Define (qw/euc-china euc-cn euccn euc-gb
152     cn-gb cn-gb-2312 chinese-iso-8bit ugb
153   gb2312 csgb2312 x-euc-cn cp51936   ibm-euccn CP1383 1383/);   gb2312 csgb2312 x-euc-cn cp51936   ibm-euccn CP1383 1383/);
154    
155  =item euc-china  =item euc-china
156    
157  EUC (ISO/IEC 2022 based 8-bit encoding) for Chinese.  EUC (ISO/IEC 2022 based 8-bit encoding) for Chinese.
158  (Alias: euc-cn (emacsen), cn-gb (RFC 1922), cn-gb-2312 (RFC 1922),  (Alias: euc-cn (emacsen), euccn, euc-gb, cn-gb (RFC 1922), cn-gb-2312 (RFC 1922),
159  chinese-iso-8bit (emacsen), gb2312 (IANA), csgb2312 (IANA),  chinese-iso-8bit (emacsen), ugb, gb2312 (IANA), csgb2312 (IANA),
160  x-euc-cn, CP51936 (M$))  x-euc-cn, CP51936 (M$))
161    
162  =cut  =cut
# Line 169  sub __2022__common ($) { Line 170  sub __2022__common ($) {
170  package Encode::ISO2022::EightBit::EUCCHINA165;  package Encode::ISO2022::EightBit::EUCCHINA165;
171  use vars qw/@ISA/;  use vars qw/@ISA/;
172  push @ISA, 'Encode::ISO2022::EightBit';  push @ISA, 'Encode::ISO2022::EightBit';
173  __PACKAGE__->Define (qw/cn-gb-isoir165/);  __PACKAGE__->Define (qw/cn-gb-isoir165 iso-ir-165/);
174    
175  =item euc-china  =item cn-gb-isoir165
176    
177  EUC (ISO/IEC 2022 based 8-bit encoding) for Chinese  EUC (ISO/IEC 2022 based 8-bit encoding) for Chinese
178  with ISO-IR 165. (Alias: cn-gb-isoir165 (RFC 1922))  with ISO-IR 165. (Alias: cn-gb-isoir165 (RFC 1922),
179    ISO-IR-165)
180    
181  =cut  =cut
182    
# Line 184  sub __2022__common ($) { Line 186  sub __2022__common ($) {
186    $C;    $C;
187  }  }