Provided by: clc-intercal_1.0~4pre1.-94.-2-5_all bug


       Charset::EBCDIC - allows to use EBCDIC string constants in ASCII programs (and v.v.)


           use Charset::EBCDIC 'ascii2abcdic';

           my $a = ebcdic2ascii "(EBCDIC text)";


       Charset::EBCDIC defines functions to convert between a subset of ASCII and a subset of
       nonstandard EBCDIC (since there isn't such a thing as a standard EBCDIC we defined our own
       variant which is guaranteed to be incompatible with all versions of EBCDIC used by IBM
       hardware - however, when we have chosen a code for a character, we have made sure that at
       least one - but certainly not all - IBM models used that same code, so the choice cannot
       be criticised). If you really want to know, several variants of EBCDIC are listed in RFC
       1345, which is available from the usual sources.

       Two functions, ebcdic2ascii and ascii2ebcdic are exportable but not exported by default.
       They do the obvious thing to their first argument and return the transformed string.


       The following are the characters recognised. The ones shown as 2 letter abbreviations
       cannot be translated to ASCII (except for the control characters, which do have an ASCII

            +   0  1  2  3  4  5  6  7  8  9  a  b  c  d  e  f   Notes
           00                          OV TA LF       CR         OV=overstrike
           10                                                    TA=tab
           20                                                    LF=linefeed
           30                                                    CR=carr-return
           40  SP                            CT  .  <  (  +  !   SP=space
           50   &                             ]  $  *  )  ; NO   CT=cents
           60   -  /          XO              |  ,  %  _  >  ?   NO=not-sign
           70                                 :  #  @  '  =  "   XO=XOR(1)
           80      a  b  c  d  e  f  g  h  i
           90      j  k  l  m  n  o  p  q  r        {     [
           a0      ~  s  t  u  v  w  x  y  z                RE   RE=registered
           b0   ^ PO       CO                                    PO=pound
           c0      A  B  C  D  E  F  G  H  I                     CO=copyright
           d0      J  K  L  M  N  O  P  Q  R        }     \
           e0         S  T  U  V  W  X  Y  Z
           f0   0  1  2  3  4  5  6  7  8  9                DE   DE=delete

       (1) The symbol for the INTECAL XOR operator, "V overstrike -".


       This module is part of CLC-INTERCAL.

       Copyright (C) 1999, 2000, 2002, 2006, 2007 Claudio Calvelli, all rights reserved

       See the files README and COPYING in the distribution for information.


       A qualified psychiatrist.