Archive for June, 2006

Obfuscated Perl

14th Jun
PERL:
  1. $S=int(rand(time))*9;while($S>=10){$t=0;$t+=$_ foreach split//,$S;$S=$t}
  2. @s=(296,1837,2403,2798,3343,3458,4021,4586,5242,5548,5573,5850,6042,6240
  3. ,6860,6967,7754,8439,8984,9239,9249,9310,10385,10655,10661,10817);srand$S
  4. ;$s=shift@s;while($s){$_=rand$S**3;push@n,chr($_)and$s=shift(@s)if++$count
  5. ==$s}map{print}@n

Who doesn't love obfuscated Perl code? This is one I wrote, and it's very simple.

My GPG Key

14th Jun

I believe in GPG for encryption and signing stuff. Here is my GPG key, which you can use to send me mail.

You can also get the key off any public PGP keyserver. The key ID is 0x4FAEE50C

Fingerprint:
F668 88AC 8232 2030 AF6E 7D5D DEDE DCC3 4FAE E50C

Download key file

 Read the rest of this entry »

-->