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)}};
___________
Eric Hodges
Re: JAPH: Fun with BEGIN/INIT/CHECK/END ;)
created: 2006-04-11 07:32:56
Nice obfu.
I've super-searched, and found that there are many obfus based on BEGIN and END. node 93951 seems the best to me. Some (but not all) others are node 312789 (the only one I already remember seen), node 226924, node 71263 (except this isn't really).