$q = new CGI;
print 	$q->header,
...