I wrote the IOC module for just such things. Basically, IOC (once properly configured) constructs a IOC::Registry singleton object from which you can then retrieve all your object instances fully wired together. I wrote an article on it in the Jan. issue of The Perl Journal as well.