Select Code to Download

use strict;
use warnings;
...
$dbh = DBI->Connect("DBI:mysql:dbname:myhost.com","root","mypassword")
+  or die "Can't connect: $dbh->errstr\n";

$dbh->disconnect();