I tend to wrap up the $main in a light weight object in the .pl file then pass that object into light weight object constructors in .pm files to manage dialogs and other such pieces that I want to organize into their own box. That lets me pass common information around in a blessed hash and allows maintenance of separate chunks of code in their own file.

I haven't time to provide a code outline at present, but ask and I'll whip up something tonight.