$sth->execute or die "-E- DB error: $DBI::errstr\n";
$sth = $dbh->prepare("update tc_individual set priesthood='$priesthood' where name=\"$individual_name\"");
$sth->execute or die "-E- DB error: $DBI::errstr\n";
$sth->execute or die "-E- DB error: $DBI::errstr\n";
$sth = $dbh->prepare("update tc_individual set priesthood='$priesthood' where name=\"$individual_name\"");
$sth->execute or die "-E- DB error: $DBI::errstr\n";