Login or Register to Ask a Question and Join Our Community

Linux and UNIX Man Pages

Linux & Unix Commands - Search Man Pages

language::intercal::charset::baudot(3pm) [debian man page]

INTERCAL::Charset::Baudot(3pm)				User Contributed Perl Documentation			    INTERCAL::Charset::Baudot(3pm)

NAME

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

SYNOPSIS

	   use Charset::Baudot 'baudot2ascii';

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

DESCRIPTION

       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 sim-
       plicity some characters are available in multiple sets, so the total is less than that.

       Two functions, baudot2ascii and ascii2baudot, are exportable (but not exported by default). They do the obvious thing to their first argu-
       ment and return the transformed string.

BAUDOT CHARACTER TABLE

       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	Tab
	   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

COPYRIGHT

       This module is part of CLC-INTERCAL.

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

       See files README and COPYING in the distribution for information.

SEE ALSO

       A qualified psychiatrist.

perl v5.8.8							    2008-03-29					    INTERCAL::Charset::Baudot(3pm)

Check Out this Related Man Page

MARC::Charset::Table(3pm)				User Contributed Perl Documentation				 MARC::Charset::Table(3pm)

NAME

       MARC::Charset::Table - character mapping db

SYNOPSIS

	   use MARC::Charset::Table;
	   use MARC::Charset::Constants qw(:all);

	   # create the table object
	   my $table = MARC::Charset::Table->new();

	   # get a code using the marc8 character set code and the character
	   my $code = $table->lookup_by_marc8(CYRILLIC_BASIC, 'K');

	   # get a code using the utf8 value
	   $code = $table->lookup_by_utf8(chr(0x043A));

DESCRIPTION

       MARC::Charset::Table is a wrapper around the character mapping database, which is implemented as a tied hash on disk. This database gets
       generated by Makefile.PL on installation of MARC::Charset using MARC::Charset::Compiler.

       The database is essentially a key/value mapping where a key is a MARC-8 character set code + a MARC-8 character, or an integer representing
       the UCS code point. These keys map to a serialized MARC::Charset::Code object.

   new()
       The consturctor.

   add_code()
       Add a MARC::Charset::Code to the table.

   get_code()
       Retrieve a code using a hash key.

   lookup_by_marc8()
       Looks up MARC::Charset::Code entry using a character set code and a MARC-8 value.

	   use MARC::Charset::Constants qw(HEBREW);
	   $code = $table->lookup_by_marc8(HEBREW, chr(0x60));

   lookup_by_utf8()
       Looks up a MARC::Charset::Code object using a utf8 value.

   db()
       Returns a reference to a tied character database. MARC::Charset::Table wraps access to the db, but you can get at it if you want.

   db_path()
       Returns the path to the character encoding database. Can be called statically too:

	   print MARC::Charset::Table->db_path();

   brand_new()
       An alternate constructor which removes the existing database and starts afresh. Be careful with this one, it's really only used on
       MARC::Charset installation.

perl v5.12.4							    2010-09-09						 MARC::Charset::Table(3pm)
Man Page