Select Code to Download

Select or download this

use DBI;
my $dbsrc = 'DBI:mysql:test:localhost';
...
my $dbh = DBI->connect($dbsrc, 'mboudreau', 'secret', \%attr) or die "
+$DBI::err
str";
$dbh->disconnect;

Select or download this
Can't locate auto/DBI/connect.al in @INC (@INC contains: /System/Library/Perl/5.8.8/darwin-thread-multi-2level /System/Library/Perl/5.8.8 /Library/Perl/5.8.8/darwin-thread-multi-2level /Library/Perl/5.8.8 /Library/Perl /Network/Library/Perl/5.8.8/darwin-thread-multi-2level /Network/Library/Perl/5.8.8 /Network/Library/Perl /System/Library/Perl/Extras/5.8.8/darwin-thread-multi-2level /System/Library/Perl/Extras/5.8.8 /Library/Perl/5.8.6/darwin-thread-multi-2level /Library/Perl/5.8.6 /Library/Perl/5.8.1 . /usr) at /Users/mrb/Sites/mason_mysql_test.mhtml line 17