Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: Another JAPH

by OverlordQ (Hermit)
on Aug 07, 2003 at 06:14 UTC ( [id://281759]=note: print w/replies, xml ) Need Help??


in reply to Morse Code JAPH

Looks to be morse code:
perl -e 'my %rt; @rt{qw/.- -... -.-. -.. . ..-. --. .... .. .--- -.- .-.. -- -. --- .--. --.- .-. ... - ..- ...- .-- -..- -.-- --.. .-.-.- | !/}=("A".."Z","."," ","\n");
hashes the dots and dashes to the letters, comma, and period.
for(split /\s+/,".--- ..- ... - | .- -. --- - .... . .-. | .--. .  .-. .-.. | .... .- -.-. -.- . .-. .-.-.- !"){print $rt{$_};}'
THen feeds your dots/dashes space delimited one by one as keys to the hash whereby the print prints out the letter.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://281759]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (7)
As of 2024-03-29 00:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found