$sth=$dbh->prepare("Update Customers set RESULTS =('?') where rec_no=?");
foreach my $row ( @rows ) {
	$sth->execute($row->{'SQL'},$row->{'REC_NO'})  or die $dbh->errstr;
}