In the first instance I would take a look at CPAN::Site which provides a method of doing roughly what you want

/J\