#!/usr/bin/perl

use DBI;

print "Content-type: text/html\n\n";

$d = DBI->connect("dbi:mysql:database=mysql", "root", "");

print "connected!!!!<br>" if $d;

##</code><code>##

[Sun Aug  6 20:26:20 2000] [error] install_driver(mysql) failed: Can't load '/usr/local/lib/perl5/site_perl/5.005/i386-freebsd/\
auto/DBD/mysql/mysql.so' for module DBD::mysql: Shared object "libmysqlclient.so.6" not found at /usr/libdata/perl/5.00503/Dyna\
Loader.pm line 169.

 at (eval 41) line 3

 at /usr/local/www/cgi-bin/test.pl line 7