close(DATA) or die "Content-type: text/html\n\n\n <P>HRUMPH \n\n <P>$!";

##</code><code>##

close(DATA) or print "Content-type: text/html\n\n\n <P>HRUMPH \n\n <P>$!";