cpan -i Bundle::DBD::mysql

##</code><code>##

   DBD::mysql
   DBI
   ExtUtils::MakeMaker
   Perl
   Term::ReadKey
   Test::Simple

##</code><code>##

#!/usr/bin/perl -w

use strict;
use warnings;
use DBI;

my $db="test";
my $host="localhost";
my $user="test";
my $password="test"; 

#connect to MySQL database
my $dbh = DBI->connect ("DBI:mysql:database=$db:host=$host",$user,$password) or die "Can't connect to database: $DBI::errstr\n";

#disconnect from database
$dbh->disconnect or warn "Disconnection error: $DBI::errstr\n";

exit;

##</code><code>##

perl: symbol lookup error: /usr/lib64/perl5/site_perl/5.8.8/x86_64-linux-thread-multi/auto/DBD/mysql/mysql.so: undefined symbol: mysql_init