We don't bite newbies here... much | |
PerlMonks |
Re: Another JAPHby OverlordQ (Hermit) |
on Aug 07, 2003 at 06:14 UTC ( [id://281759]=note: print w/replies, xml ) | Need Help?? |
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.
In Section
Obfuscated Code
|
|