Hey PT, thanks for the advice ...
Before I do that, I wonder if this line isn't the culprit ...
-value => [$user_profile[0], md5_hex($new_password), $public_name, $in{DaysPrune}, $in{u}, $pntf_hidden, $avhide, "", "", "", $quickreply],
What would those three "", be for?