Upgrade to Encode 2.18
[p5sagit/p5-mst-13.2.git] / ext / Encode / lib / Encode / Config.pm
CommitLineData
fdd579e2 1#
2# Demand-load module list
3#
4package Encode::Config;
656ebd29 5our $VERSION = do { my @r = ( q$Revision: 2.3 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };
fdd579e2 6
7use strict;
656ebd29 8use warnings;
fdd579e2 9
d1256cb1 10our %ExtModule = (
11
12 # Encode::Byte
13 #iso-8859-1 is in Encode.pm itself
14 'iso-8859-2' => 'Encode::Byte',
15 'iso-8859-3' => 'Encode::Byte',
16 'iso-8859-4' => 'Encode::Byte',
17 'iso-8859-5' => 'Encode::Byte',
18 'iso-8859-6' => 'Encode::Byte',
19 'iso-8859-7' => 'Encode::Byte',
20 'iso-8859-8' => 'Encode::Byte',
21 'iso-8859-9' => 'Encode::Byte',
22 'iso-8859-10' => 'Encode::Byte',
23 'iso-8859-11' => 'Encode::Byte',
24 'iso-8859-13' => 'Encode::Byte',
25 'iso-8859-14' => 'Encode::Byte',
26 'iso-8859-15' => 'Encode::Byte',
27 'iso-8859-16' => 'Encode::Byte',
28 'koi8-f' => 'Encode::Byte',
29 'koi8-r' => 'Encode::Byte',
30 'koi8-u' => 'Encode::Byte',
31 'viscii' => 'Encode::Byte',
32 'cp424' => 'Encode::Byte',
33 'cp437' => 'Encode::Byte',
34 'cp737' => 'Encode::Byte',
35 'cp775' => 'Encode::Byte',
36 'cp850' => 'Encode::Byte',
37 'cp852' => 'Encode::Byte',
38 'cp855' => 'Encode::Byte',
39 'cp856' => 'Encode::Byte',
40 'cp857' => 'Encode::Byte',
41 'cp860' => 'Encode::Byte',
42 'cp861' => 'Encode::Byte',
43 'cp862' => 'Encode::Byte',
44 'cp863' => 'Encode::Byte',
45 'cp864' => 'Encode::Byte',
46 'cp865' => 'Encode::Byte',
47 'cp866' => 'Encode::Byte',
48 'cp869' => 'Encode::Byte',
49 'cp874' => 'Encode::Byte',
50 'cp1006' => 'Encode::Byte',
51 'cp1250' => 'Encode::Byte',
52 'cp1251' => 'Encode::Byte',
53 'cp1252' => 'Encode::Byte',
54 'cp1253' => 'Encode::Byte',
55 'cp1254' => 'Encode::Byte',
56 'cp1255' => 'Encode::Byte',
57 'cp1256' => 'Encode::Byte',
58 'cp1257' => 'Encode::Byte',
59 'cp1258' => 'Encode::Byte',
60 'AdobeStandardEncoding' => 'Encode::Byte',
61 'MacArabic' => 'Encode::Byte',
62 'MacCentralEurRoman' => 'Encode::Byte',
63 'MacCroatian' => 'Encode::Byte',
64 'MacCyrillic' => 'Encode::Byte',
65 'MacFarsi' => 'Encode::Byte',
66 'MacGreek' => 'Encode::Byte',
67 'MacHebrew' => 'Encode::Byte',
68 'MacIcelandic' => 'Encode::Byte',
69 'MacRoman' => 'Encode::Byte',
70 'MacRomanian' => 'Encode::Byte',
71 'MacRumanian' => 'Encode::Byte',
72 'MacSami' => 'Encode::Byte',
73 'MacThai' => 'Encode::Byte',
74 'MacTurkish' => 'Encode::Byte',
75 'MacUkrainian' => 'Encode::Byte',
76 'nextstep' => 'Encode::Byte',
77 'hp-roman8' => 'Encode::Byte',
78 'gsm0338' => 'Encode::Byte',
79
80 # Encode::EBCDIC
81 'cp37' => 'Encode::EBCDIC',
82 'cp500' => 'Encode::EBCDIC',
83 'cp875' => 'Encode::EBCDIC',
84 'cp1026' => 'Encode::EBCDIC',
85 'cp1047' => 'Encode::EBCDIC',
86 'posix-bc' => 'Encode::EBCDIC',
87
88 # Encode::Symbol
89 'dingbats' => 'Encode::Symbol',
90 'symbol' => 'Encode::Symbol',
91 'AdobeSymbol' => 'Encode::Symbol',
92 'AdobeZdingbat' => 'Encode::Symbol',
93 'MacDingbats' => 'Encode::Symbol',
94 'MacSymbol' => 'Encode::Symbol',
95
96 # Encode::Unicode
97 'UCS-2BE' => 'Encode::Unicode',
98 'UCS-2LE' => 'Encode::Unicode',
99 'UTF-16' => 'Encode::Unicode',
100 'UTF-16BE' => 'Encode::Unicode',
101 'UTF-16LE' => 'Encode::Unicode',
102 'UTF-32' => 'Encode::Unicode',
103 'UTF-32BE' => 'Encode::Unicode',
104 'UTF-32LE' => 'Encode::Unicode',
105 'UTF-7' => 'Encode::Unicode::UTF7',
106);
107
108unless ( ord("A") == 193 ) {
109 %ExtModule = (
110 %ExtModule,
111 'euc-cn' => 'Encode::CN',
112 'gb12345-raw' => 'Encode::CN',
113 'gb2312-raw' => 'Encode::CN',
114 'hz' => 'Encode::CN',
115 'iso-ir-165' => 'Encode::CN',
116 'cp936' => 'Encode::CN',
117 'MacChineseSimp' => 'Encode::CN',
fdd579e2 118
d1256cb1 119 '7bit-jis' => 'Encode::JP',
120 'euc-jp' => 'Encode::JP',
121 'iso-2022-jp' => 'Encode::JP',
122 'iso-2022-jp-1' => 'Encode::JP',
123 'jis0201-raw' => 'Encode::JP',
124 'jis0208-raw' => 'Encode::JP',
125 'jis0212-raw' => 'Encode::JP',
126 'cp932' => 'Encode::JP',
127 'MacJapanese' => 'Encode::JP',
128 'shiftjis' => 'Encode::JP',
129
130 'euc-kr' => 'Encode::KR',
131 'iso-2022-kr' => 'Encode::KR',
132 'johab' => 'Encode::KR',
133 'ksc5601-raw' => 'Encode::KR',
134 'cp949' => 'Encode::KR',
135 'MacKorean' => 'Encode::KR',
136
137 'big5-eten' => 'Encode::TW',
138 'big5-hkscs' => 'Encode::TW',
139 'cp950' => 'Encode::TW',
140 'MacChineseTrad' => 'Encode::TW',
141
142 #'big5plus' => 'Encode::HanExtra',
143 #'euc-tw' => 'Encode::HanExtra',
144 #'gb18030' => 'Encode::HanExtra',
145
146 'MIME-Header' => 'Encode::MIME::Header',
147 'MIME-B' => 'Encode::MIME::Header',
148 'MIME-Q' => 'Encode::MIME::Header',
149
150 'MIME-Header-ISO_2022_JP' => 'Encode::MIME::Header::ISO_2022_JP',
151 );
fdd579e2 152}
153
aae85ceb 154#
155# Why not export ? to keep ConfigLocal Happy!
156#
d1256cb1 157while ( my ( $enc, $mod ) = each %ExtModule ) {
aae85ceb 158 $Encode::ExtModule{$enc} = $mod;
159}
fdd579e2 160
1611;
b2704119 162__END__
163
164=head1 NAME
165
166Encode::Config -- internally used by Encode
167
168=cut