Your Availability
body<=
login to proceed. p?>";
}
LJ::load_user_props($u, "single_status", "single_pickw", "city", "country", "state");
my %countries;
my %states;
LJ::load_codes({ "country" => \%countries, "state" => \%states });
my $ret;
# save mode:
if (LJ::did_post())
{
unless ($POST{'status'}) {
LJ::set_userprop($u, "single_status", "");
return "Saved. You won't show up as available.";
}
if ($POST{'country'} eq "US" && length($POST{'state'}) > 2) {
foreach (keys %states) {
$POST{'state'} = $_
if (lc($states{$_}) eq $POST{'state'});
}
}
# clean/verify
$POST{'age'} += 0;
return "You need to provide an age." unless
$POST{'age'};
return "Sorry, you're too young to use this service." unless
$POST{'age'} >= 18;
return $ML{'Error'} unless ($POST{'status'} =~ /^[MF][MF]$/);
LJ::set_userprop($u, "single_status",
join("|", map { $POST{$_} } qw(status country state city age)));
LJ::set_userprop($u, "single_pickw",
$POST{'single_pickw'});
$ret .= "Saved. Now, go search for somebody!";
return $ret;
}
$ret .= "";
return $ret;
}
_code?>
<=body
page?>