Help for this page
print $file "<html xmlns:o=\"urn:schemas-microsoft-com:office:offi +ce\"\n"; print $file " xmlns:x=\"urn:schemas-microsoft-com:office:exce +l\"\n"; ... print $file "</head>\n\n";