$db2->Sql($sql2)|| die("Query error");

##</code><code>##

  my $rc = $db2->Sql($sql2);
  die sprintf("Query error!! RC: %s ; Error: %s ; SQL: %s", $rc, $db2->Error(), $sql2) if $rc;