my $dbh = DBI->connect("dbi:mysql:host=$host", $user, $pass) ...