my $sth = $dbh->prepare($SQL) or die $dbh->errstr;
$sth->execute() or die $dbh->errstr;
$dbh->commit or die $dbh->errstr;