Help for this page
#!/usr/bin/perl $|=1; ... //--></script> _EOT_ print '</body></html>'; # Page finished