*boggle*

castaway@desert-island:/home/castaway > perl5.8.0 perl/davidoobfu.pl
Hacker

castaway@desert-island:/home/castaway > perl5.8.0 -w perl/davidoobfu.p
+l
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 3.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 4.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 4.
Argument ">>" isn't numeric in scalar assignment at perl/davidoobfu.pl
+ line 1.
Just another Perl Hacker

castaway@desert-island:/home/castaway > perl5.8.1 perl/davidoobfu.pl
Just another Perl Hacker

castaway@desert-island:/home/castaway > perl5.8.1 -w perl/davidoobfu.p
+l
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 2.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 3.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 4.
Unquoted string "i" may clash with future reserved word at perl/davido
+obfu.pl line 4.
Argument ">>" isn't numeric in scalar assignment at perl/davidoobfu.pl
+ line 1.
Use of uninitialized value in list assignment at perl/davidoobfu.pl li
+ne 2.
Use of uninitialized value in open at perl/davidoobfu.pl line 3.
Hacker
[download]

*huh*

C.