my $sth = $dbh->prepare(qq{UPDATE $regtable SET favorites=? WHERE ID=?});
$sth->execute($favorites, $ID) or die $dbh->errstr;