$sth->execute($rec_num, $src_cdr_file, $host,$init_status,
			$f[20],   $f[04], $city,         $state,
			$cname,   $vname,        $npa,          $nxx,
			$ocn,     $lata,         $lata_name,    $pdd,
			$f[0],    $f[1],         $f[2],         $f[3]
			
		)

##</code><code>##

my $value_quoted = $dbh->quote( $value );
my $SQL = "DELETE FROM t WHERE field = $value_quoted";
$dbh->do( $SQL );