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

    use Charset::Baudot;

    my $a = baudot2ascii"(Baudot text)";

Charset::Baudot defines functions to convert between a subset of ASCII and a subset of nonstandard Baudot - the original Baudot allows only letters, numbers, and some punctuation. We assume that a Shift to letters code while already in letters mode means Shift to lowercase and Shift to figures while already in figures mode means Shift to symbols. This allows to use up to 120 characters. However, for simplicity some characters are available in multiple sets, so the total is less than that.

By default, both functions baudot2ascii and ascii2baudot are imported in your namespace. If you don't want that, you know how to avoid it. They do the obvious thing to their first argument and return the transformed string.

There is another function, standardbaudot, not exported by default, which sets the module's behaviour to shandard Baudot.

Well, that's all.

The following are the characters recognised. As described, the shift characters have nonstandard meaning.

     set   Letters     Lowercase    Figures    Symbols
  code
    00       N/A          N/A         N/A        N/A
    01        E            e           3        Cents
    02       L/F          L/F         L/F        L/F    (line feed)
    03        A            a           -          +
    04      Space        Space       Space      Space
    05        S            s          BELL        \
    06        I            i           8          #
    07        U            u           7          =
    08       C/R          C/R         C/R        C/R    (carriage return)
    09        D            d           $          *
    10        R            r           4          {
    11        J            j           '          ~
    12        N            n           ,         XOR
    13        F            f           !          |
    14        C            c           :          ^
    15        K            k           (          <
    16        T            t           5          [
    17        Z            z           "          }
    18        W            w           )          >
    19        L            l           2          ]
    20        H            h          N/A     backspace
    21        Y            y           6          @
    22        P            p           0         N/A
    23        Q            q           1        POUND
    24        O            o           9         NOT
    25        B            b           ?        delete
    26        G            g           &         N/A
    27     Figures      Figures     Symbols    Symbols
    28        M            m           .          %
    29        X            x           /          _
    30        V            v           ;         N/A
    31    Lowercase    Lowercase    Letters    Letters

This module reimplements some of the functionality of two other modules (see Exporter, Carp, Reinventing the Wheel). This is intentional, as it will leave larger scope for obfuscation in a future release.

This module is part of CLC-INTERCAL.

Copyright (c) 1999 by Claudio Calvelli <CWlunatic@assurdo.com>, all (f)rights reserved.

This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either 2 of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

A qualified psychiatrist.