[Derision]

sub EVENT_SAY
{
        $gender = $client->GetGender();

        quest::say("Your gender is $gender");

        if($gender == 0)
        {
                quest::say("You are male.");
        }
        else
        {
                quest::say("You are female.");
        }

}

Technically 0 = male, 1 = female, 2 = neuter. There is also GetBaseGender which I guess you could use if you wanted to find the real gender of a player with a gender changing Illusion cast on them.