Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Crypto Japh

by secret (Beadle)
on Dec 06, 2005 at 17:03 UTC ( [id://514553]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    @keys=qw'79 11 34 69 41 27';
    @list_to_crypt = split/ /, 'writing Library. Building consider TO($FOO
    +) *binary*' ;
    @result=map{ crypt ($_.' ', shift @keys)  } @list_to_crypt ;
    
  2. or download this
    79jUStLZ6Ck9c
    11anOTHZ33A12
    ...
    69pERLsGUZYU2
    41HAcKS9/lrEQ
    27eRTYtC6a5HI
    
  3. or download this
    @matcher =  qw'2 4 4 2 5 4' ;
    foreach $crypted (@result ) {
    ...
    $crypted  =~/..(.{$x}).*/g ;
    push @final, $1 ;
    }
    
  4. or download this
    jUSt
    anOTH
    ...
    pERL
    HAcK
    eR
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chanting in the Monastery: (4)
As of 2024-03-29 15:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found