As evidenced by the output of the following one-liner:

perl -e 'sub bob { $i=1,2;} print $i, "\t", scalar bob, "\n";'

If I've learned one thing about interpreting obfu, it's that if I can't immediately tell what a line of code does, make it a subroutine and observe its behavior in isolation.

Spud Zeppelin * spud@spudzeppelin.com