$dbh->do(qq{sql statement}) || die $dbh->errstr;