Help for this page
#!/usr/local/bin/perl -w use strict; ... close FILE; print $q->end_html;
Content-Type: text/html; charset=ISO-8859-1 ... readline() on closed filehandle main::FILE at ./test.pl line 12. </head><body></body></html>