$dbh= DBI->connect("DBI:mysql:host=localhost;database=testsites","qaus er","blah",{PrintError => 0, RaiseError => 1}) or die $DBI::errstr; -and- $sth = $dbh->prepare ($stmt) or die $dbh->errstr;