<perl>
$_header="Content-type: text/html; charset=utf-8\n\n";
</perl>
<do action=all>