Wow, I read the source code for that, a perlmonk definitely did not write that. No use strict at all. All global variables, no mys at all. It undefs $/ and doesn't even reset it. Instead of simply saying:
open FH, 'foo.bar' or die "could not open";
it says:
open FH, 'foo.bar' or print 'could not open' and exit;
It's filled with those print '...' and exit commands too, not just in the open call. I can see many places that need improvement. It is a neat idea though, if not useful, then just fun.
The 15 year old, freshman programmer,
Stephen Rawls | [reply] [Watch: Dir/Any] [d/l] [select] |