unless (provided ($query->param('is_a_chicken'))
{
     print "You must choose an option.<BR>\n";
}