okay, looks like I forgot to go clean that section up... []/w3timages/icons/blush.gif[/] so, let me clarify and fix... []/w3timages/icons/wink.gif[/]
based on a user cgi file that uses this format...
[:blue]
user name
password
email
web-site url
status2 [:red](don't know what this is... []/w3timages/icons/crazy.gif[/])
Occupation
Location
Number of Posts
User Title
Interests
Registration Date
Show E-mail
Bio
So, instead of $CurrTitle, I should have used $status. So, let's see if I can get this right... it should look like this:
[:blue]my $NewTitle = [:red]$status;
$UserTitle_q = $dbh->quote([:red]$NewTitle);
if ( ($status ne "Administrator") &&
($status ne "Moderator") ) {
open (TITLES,"filters/usertitles");
my @titles = <TITLES>
close (TITLES);
for (my $i=0; $i<=$#titles; $i++) {
my ($req_posts,$title) = split(/\t/,$titles[$i]);
chomp ($title);
if ($posts == $req_posts) {
$NewTitle = $title;
last;
}
}
if ($NewTitle ne $status) {
$UserTitle_q = $w3t::dbh->quote($NewTitle);
}
}
Just make sure to set up your filters/usertitles file with the titles for how many posts before you run this...
Let me know if that does not clean it up....
matt