print $q->header;

##</code><code>##

print $q->header(-type=>'text/plain');