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