my $sth = $dbh->prepare($sql, { RaiseError => 1 });
   $sth->execute() or die "$!\n";