You would have saved a lot of time by "use warnings;". It would have pointed out all the errors :)

Interestingly, he did, as he had thrown the '-w' switch to the perl executable. It's curious that he didn't get more warnings... unless the OP didn't give us all of them.