my @NeuerEintrag = 
   (
    "<!-- Eintrag [" . &CGI::escapeHTML($cgi->param(Username)) . "] -->\n",
    "<table border=\"0\" width=\"40%\"><tr>\n",
    "<th>Name:</th><td>" . &CGI::escapeHTML($cgi->param(Username)) . "</td></tr>\n",
    "<tr><td colspan=\"2\">" . &CGI::escapeHTML($cgi->param(Usertext)) . "</td>\n",
    "</tr></table>\n",
    );