open(PAGE, "<:utf8", "$news"); @HTML = ; print escapeHTML(join '', @HTML); close PAGE;