open(FOUT,"> somefile.html" or die "$!";

print FOUT qq(
<table width="770" cellpadding=0 ... 

-------8< snip! 8<-----------------