All the Perl that's Practical to Extract and Report
http://it.slashdot.org/article.pl?sid=07/09/07/122200Cool.