Well, first thing I'd do is run your program through perltidy, then rewrite it to use more subs, so that when you're stuck on an one particular part, it doesn't depend on the rest of your program ... :)