if ($in{tax_id} ne "") { #Only update this record IF it has a value! $dbh->do (qq{ UPDATE `reg_users` SET `tax_id` = ? WHERE `username` = ? }, undef, $in{tax_id}, $username); $dbh->disconnect(); } $dbh->do (qq{ UPDATE `reg_users` SET `aff_url` = ? WHERE `username` = ? }, undef, $in{aff_url}, $username); $dbh->disconnect(); $dbh->do (qq{ UPDATE `reg_users` SET `aff` = ?, `aff_su_date` = ? WHERE `username` = ? }, undef, "yes", $formated_date, $username); $dbh->disconnect();