
Text::Morse - Perl totally useless extension for Morse code

use Text::Morse;
my $morse = new Text::Morse;
print scalar($morse->Decode("... --- ..."));
print scalar($morse->Encode("Adam Bertil"));

Useless but fun.

I need the morse codes for Hebrew, Arabic, Greek and Russian. Please send in universal high ASCII (UNIX or Windows, not DOS) :-)

Ariel Brosh, schop@cpan.org

perl(1), /usr/games/morse.