1package Encode::EBCDIC; 2use strict; 3use warnings; 4use Encode; 5our $VERSION = do { my @r = ( q$Revision: 2.2 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; 6 7use XSLoader; 8XSLoader::load( __PACKAGE__, $VERSION ); 9 101; 11__END__ 12 13=head1 NAME 14 15Encode::EBCDIC - EBCDIC Encodings 16 17=head1 SYNOPSIS 18 19 use Encode qw/encode decode/; 20 $posix_bc = encode("posix-bc", $utf8); # loads Encode::EBCDIC implicitly 21 $utf8 = decode("", $posix_bc); # ditto 22 23=head1 ABSTRACT 24 25This module implements various EBCDIC-Based encodings. Encodings 26supported are as follows. 27 28 Canonical Alias Description 29 -------------------------------------------------------------------- 30 cp37 31 cp500 32 cp875 33 cp1026 34 cp1047 35 posix-bc 36 37=head1 DESCRIPTION 38 39To find how to use this module in detail, see L<Encode>. 40 41=head1 SEE ALSO 42 43L<Encode>, L<perlebcdic> 44 45=cut 46