All the Perl that's Practical to Extract and Report
Here's a nice writeup from Jamis Buck using dependency injection (Needle) and a web framework (Rails).