Text::Toalpha - Convert arbitary characters into letters

  use Text::Toalpha qw(:all);
  my $alpha = toalpha($var);
  my $orig = fromalpha($alpha);

Text::Toalpha converts arbitary characters into letters. The interface is the functions toalpha($var) and fromalpha($alpha). They do what there names suggest.

NOTE: This module does not use a code format used anywhere else.

NOTE 2: The code for this module is not a good example and is very messy.

• You want to send data (say, through email), but you don't want it to be mangled by the sending/reciving program.
• You have a bunch of binary data and want to have it in a convienently printable form.
• You want to just plain avoid non-alphabetic characters.

Text::Toalpha uses a mapping table from characters to letters which maps them into digrams. Need more be said?

The resulting output will double in size.

The permutation of characters to letters is not very well permutated. In English, the output characters are not very well distributed over the letters of the alphabet.

isalpha

Samuel Lauber, <samuell@cpan.org>

Copyright 2005 by Samuel Lauber

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.