if(! $q->param('userid'))

##</code><code>##

print "Content-type: text/html\n\n";

##</code><code>##

print $q->header;