Help for this page
open (TEMPOUT,">$outfile") or die "opening $outfile: $!\n";
print TEMPOUT <<"END"; <html><body> ... END