if( !$sth ){ $dbh = DBI->connect("dbi:SQLite:dbname=bounce.sql3","",""); $sth = $dbh->prepare( "INSERT INTO email_stop (email, modtime, reason ) VALUES ( ?, ?, ? )" ); } if( $sth->execute( $email, $fields[0], 1 ) ){ $r->checkpoint(); } else { # DB perhaps down. # Try again. undef $dbh; undef $sth; }