This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
EBCDIC: Disable Encode::JP and Encode::Tcl for now.
[perl5.git] / ext / Encode / JP / JP.pm
1 package Encode::JP;
2 BEGIN {
3     if (ord("A") == 193) {
4         die "Encode::JP not supported on EBCDIC\n";
5     }
6 }
7 use Encode;
8 our $VERSION = '0.02';
9 use XSLoader;
10 XSLoader::load('Encode::JP',$VERSION);
11
12 use Encode::JP::JIS;
13 use Encode::JP::ISO_2022_JP;
14
15 1;
16 __END__