Can you post the whole program?
I suspect the error is in the 'field'. You need the name of the field variable there ( such as name or address ). Like this:

#!/usr/bin/perl -wT

use CGI;
use CGI::Carp qw( fatalsToBrowser );

if($q->param('name') eq "")
{
 &printForm();
 &results();
}
[download]

Did you declare the fields with 'my' in your CGI app?
-DK