Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Challenge: Hidden Message

by Limbic~Region (Chancellor)
on May 09, 2006 at 22:57 UTC ( [id://548346]=perlmeditation: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    CPD6Z98SB2KQNWV0F7Y1IX4GLRA5MTOJHE3U
    CXZOL6SUI2WTJ30HF519YPGBRNAK48MQVD7E
    ...
    Z3C7SJVODL25TRQ01HPWGNKXB4UA68YMI9EF
    BC9OXDHS2FI5Z6U0TYL1VPGQK7ANR38MEWJ4
    K4TCQBHS2ZV7FXU0P8R1YGDON3A6JILM9EW5
    
  2. or download this
    my @str = map {chomp; $_} <DATA>;
    print LCS(@str), "\n";
    ...
        join'',map$l{$_}[1],split/:/,$s;
    }
    sub g{$_[1]->[$_]<=$_[0]->[$_]&&return 0 for 0..(@{$_[0]}>@{$_[1]}?$#{
    +$_[1]}:$#{$_[0]});1}
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlmeditation [id://548346]
Approved by kvale
Front-paged by TStanley
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (3)
As of 2024-04-25 17:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found