Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Crypto Japh

by liverpole (Monsignor)
on Nov 18, 2005 at 05:43 UTC ( #509695=obfuscated: print w/ replies, xml ) Need Help??

This uses a trick I've thought about trying for several weeks, and finally got around to doing.  It turned out much better than I had expected.

After it was working the way I liked, I did a search through past obfuscations at Perlmonks to make sure nobody else had done this before.  The only other submission I found which uses crypt was this one, but its method is significantly different.

One of the nice things about using crypt is that running perl -MO=Deparse on it doesn't give anything away.

(I decided to create a signature based on the idea, too, which I'll use for the first time here).

@::=qw'79 11 34 69 41 27 2 4 4 2 5 4'; @::_=map{$x=pop@::;(crypt$_.' ',shift@::)=~/..(.{$x}).*/g} split/ /, 'writing Library. Building consider TO($FOO) *binary*'; map{print;/^[Hea]/ or print ' '}(@::_,',',$/)

@ARGV=split//,"/:L"; map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"

Comment on Crypto Japh
Download Code
Re: Crypto Japh
by secret (Beadle) on Dec 06, 2005 at 17:03 UTC
    veRy Nic3 !
    Here is my solution to this riddle ;)

      Very nice analysis++.

      The thing that took the most time was, of course, finding words (and combinations of word fragments) which gave the appropriate crypt results, since crypt is a one-way algorithm.  I was especially surprised when I found the fairly long (5-letter) string "anOTH".


      @ARGV=split//,"/:L"; map{print substr crypt($_,ord pop),2,3}qw"PerlyouC READPIPE provides"

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://509695]
Approved by Tanktalus
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (3)
As of 2014-10-25 00:35 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (138 votes), past polls