print $fh <<"E_O_HTML"; $ut Page $pn usw. E_O_HTML