All the Perl that's Practical to Extract and Report
I just committed this:
# $Id: MySQL.pm,v 1.666 2004/08/13 22:49:40 pudge Exp $