Select Code to Download

my $dbh = DBI->connect("DBI:mysql:$database:$db_server", $user, $passw
+ord);

my $dbh = DBI->connect("DBI:mysql:$database;host=$db_server", $user,
$password, {RaiseError=> 1})
   or die $DBI::errstr;