Skip to content

Instantly share code, notes, and snippets.

@laserbat
Created July 7, 2011 15:25
Show Gist options
  • Save laserbat/1069756 to your computer and use it in GitHub Desktop.
Save laserbat/1069756 to your computer and use it in GitHub Desktop.
#!/usr/bin/perl
$_=99072;$o=int(10*cos()**sin());@a=(45906,68783,26026);$l=107618;$a[@a]=$a[0]^$a[1]^$a[2]^$l;$f
[@f]=(10000*(cos()**sin()))foreach@a;s!$_!print(chr($o+sqrt))foreach(@f)!e&&printf(chr$o/(@f-1))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment