All the Perl that's Practical to Extract and Report
I just got the four year old code from my TPJ article working with only one (cosmetic) bug and a few configuration tweaks. Woohoo.