This isn't really going to help, probably.

But the first thing I thought of when I saw your code was my perlmonks t-shirt:

"So, you didn't use strict?"

"And no warnings?"

"Expect the Inquisitors!!!"

:)
--
Mike