my $retval = eval {
      $dbh->execute(@values);
  };
  unless ($retval) {
      _db_recover();
  }

##</code><code>##

  eval {
      $dbh->execute(@values);
  };
  if ($@) {
      _db_recover();
  }