I downloaded your code, and in my editor line 95 is the comment # I use status.new for testing. I suggest that you try to track down your problem with the Perl debugger. If you have more time, I highly recommend Log::Log4Perl.