JAPH: Fun with BEGIN/INIT/CHECK/END ;)

END{print $a};BEGIN{$a.=chr($i*=2);BEGIN{$i=53;};}INIT{$a.=chr($i-=3*2
+2);};CHECK{$a.=chr($i+=3*5+1-1);BEGIN{$a.=chr($i+=-2*4-1)}};
[download]

___________
Eric Hodges

Comment on JAPH: Fun with BEGIN/INIT/CHECK/END ;) Download Code

Replies are listed 'Best First'.
Re: JAPH: Fun with BEGIN/INIT/CHECK/END ;) by ambrus (Abbot) on Apr 11, 2006 at 11:32 UTC
Nice obfu. I've super-searched, and found that there are many obfus based on BEGIN and END. The BEGINning of the END seems the best to me. Some (but not all) others are In the BEGINning (the only one I already remember seen), BEGINner Obfu, Spaceless JAPH (except this isn't really). Update 2010-10-21: there's also The Decline and Fall of the Roman Empire.	[reply]