home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / Encode / Config.pm < prev    next >
Encoding:
Perl POD Document  |  2009-06-26  |  5.9 KB  |  170 lines
  1. #
  2. # Demand-load module list
  3. #
  4. package Encode::Config;
  5. our $VERSION = do { my @r = ( q$Revision: 2.4 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };
  6.  
  7. use strict;
  8. use warnings;
  9.  
  10. our %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.     'gsm0338'               => 'Encode::GSM0338',
  80.  
  81.     # Encode::EBCDIC
  82.     'cp37'     => 'Encode::EBCDIC',
  83.     'cp500'    => 'Encode::EBCDIC',
  84.     'cp875'    => 'Encode::EBCDIC',
  85.     'cp1026'   => 'Encode::EBCDIC',
  86.     'cp1047'   => 'Encode::EBCDIC',
  87.     'posix-bc' => 'Encode::EBCDIC',
  88.  
  89.     # Encode::Symbol
  90.     'dingbats'      => 'Encode::Symbol',
  91.     'symbol'        => 'Encode::Symbol',
  92.     'AdobeSymbol'   => 'Encode::Symbol',
  93.     'AdobeZdingbat' => 'Encode::Symbol',
  94.     'MacDingbats'   => 'Encode::Symbol',
  95.     'MacSymbol'     => 'Encode::Symbol',
  96.  
  97.     # Encode::Unicode
  98.     'UCS-2BE'  => 'Encode::Unicode',
  99.     'UCS-2LE'  => 'Encode::Unicode',
  100.     'UTF-16'   => 'Encode::Unicode',
  101.     'UTF-16BE' => 'Encode::Unicode',
  102.     'UTF-16LE' => 'Encode::Unicode',
  103.     'UTF-32'   => 'Encode::Unicode',
  104.     'UTF-32BE' => 'Encode::Unicode',
  105.     'UTF-32LE' => 'Encode::Unicode',
  106.     'UTF-7'    => 'Encode::Unicode::UTF7',
  107. );
  108.  
  109. unless ( ord("A") == 193 ) {
  110.     %ExtModule = (
  111.         %ExtModule,
  112.         'euc-cn'         => 'Encode::CN',
  113.         'gb12345-raw'    => 'Encode::CN',
  114.         'gb2312-raw'     => 'Encode::CN',
  115.         'hz'             => 'Encode::CN',
  116.         'iso-ir-165'     => 'Encode::CN',
  117.         'cp936'          => 'Encode::CN',
  118.         'MacChineseSimp' => 'Encode::CN',
  119.  
  120.         '7bit-jis'      => 'Encode::JP',
  121.         'euc-jp'        => 'Encode::JP',
  122.         'iso-2022-jp'   => 'Encode::JP',
  123.         'iso-2022-jp-1' => 'Encode::JP',
  124.         'jis0201-raw'   => 'Encode::JP',
  125.         'jis0208-raw'   => 'Encode::JP',
  126.         'jis0212-raw'   => 'Encode::JP',
  127.         'cp932'         => 'Encode::JP',
  128.         'MacJapanese'   => 'Encode::JP',
  129.         'shiftjis'      => 'Encode::JP',
  130.  
  131.         'euc-kr'      => 'Encode::KR',
  132.         'iso-2022-kr' => 'Encode::KR',
  133.         'johab'       => 'Encode::KR',
  134.         'ksc5601-raw' => 'Encode::KR',
  135.         'cp949'       => 'Encode::KR',
  136.         'MacKorean'   => 'Encode::KR',
  137.  
  138.         'big5-eten'      => 'Encode::TW',
  139.         'big5-hkscs'     => 'Encode::TW',
  140.         'cp950'          => 'Encode::TW',
  141.         'MacChineseTrad' => 'Encode::TW',
  142.  
  143.         #'big5plus'           => 'Encode::HanExtra',
  144.         #'euc-tw'             => 'Encode::HanExtra',
  145.         #'gb18030'            => 'Encode::HanExtra',
  146.  
  147.         'MIME-Header' => 'Encode::MIME::Header',
  148.         'MIME-B'      => 'Encode::MIME::Header',
  149.         'MIME-Q'      => 'Encode::MIME::Header',
  150.  
  151.         'MIME-Header-ISO_2022_JP' => 'Encode::MIME::Header::ISO_2022_JP',
  152.     );
  153. }
  154.  
  155. #
  156. # Why not export ? to keep ConfigLocal Happy!
  157. #
  158. while ( my ( $enc, $mod ) = each %ExtModule ) {
  159.     $Encode::ExtModule{$enc} = $mod;
  160. }
  161.  
  162. 1;
  163. __END__
  164.  
  165. =head1 NAME
  166.  
  167. Encode::Config -- internally used by Encode
  168.  
  169. =cut
  170.