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

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

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


##</code><code>##



++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Peter L. Berghold --- Peter@Berghold.Net
"Those who fail to learn from history are condemned to repeat it."