All the Perl that's Practical to Extract and Report
As seen on http://use.perl.org/article.pl?sid=02/08/21/1830205