Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

just the average code

by mk. (Friar)
on Jan 19, 2006 at 21:01 UTC ( #524348=obfuscated: print w/replies, xml ) Need Help??

it's actually a very simple code (as you can tell), but my first one here, so let's pretend it's a big deal, ok?! j/k hehe

perl -e '$_=abs(sin(307));s/3|\.//g;$b=$_;$_=substr(atan2(1189,6823),2,8);eval"y/0-9/$b/";for($c=0;$c<5;$c++){print chr(substr($_,0,2));s/^..//;};'

grrr.... argh!

Replies are listed 'Best First'.
Re: just the average code
by jdalbec (Deacon) on Jan 20, 2006 at 02:41 UTC
      thank you, hadn't thought of that!

      for the numbers, they were actually (kinda) randomly chosen: i needed 7, 4, 6, 5, 8 and 2, and somehow i realized sin of 307 would fit; then i just searched for any arctangents that would possibly have the sequence 17253098 - and found!
      perl -e 'for ($x=0;$x<10000;$x++){for ($y=0;$y<10000;$y++){print "($x,$y) >>". atan2($x,$y)."\n" if atan2($x,$y)=~/17253098/}}'

      that took me about two minutes while i was at work doing nothing, so i guess they were well spent.

      grrr.... argh!
Re: just the average code
by Mago (Parson) on Jan 20, 2006 at 10:36 UTC
    perl -le '$_=abs(sin(307));s/3|\.//g;$b=$_;$_=substr(atan2(1189,6823), +2,8);eval"y/0-9/$b/";for($c=0;$c<5;$c++){print chr(substr($_,0,2));s/ +^..//;};'



Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: obfuscated [id://524348]
Approved by McDarren
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (3)
As of 2022-01-21 23:09 GMT
Find Nodes?
    Voting Booth?
    In 2022, my preferred method to securely store passwords is:

    Results (59 votes). Check out past polls.