This may or may not be of help to you, but you might look in to the Perl/Tk Debugger here. It's saved my bacon any number of times and it will allow you to not have to print out "the problem" but watch your variables and how they're changing during execution.

Hope that helps!