out "<h3>Liste aller Eintr&auml;ge</h3>";
out "<table><tr><td>Name</td><td>Telefon</td><td>test</td><td>Datum</td></tr>";
while(get_next)
{
  out "<tr><td><a href=\"$_link&Id=$_id\">$Name</a></td><td>$Telefon</td><td>$test</td><td>";
  out datum ("$date","Tag0.Monat0.Jahr");
  out "</td></tr>";
}
out "</table>";

    out <<EOF;
<h3>Eintrag &auml;ndern</h3>
<table>
<form action="/cgi-bin/baseportal.pl?htx=$htx&Id=$Id" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="$htx">
<input type=hidden name="Id=" value="$Id">
<tr><td>Name:</td><td><input type="text" name="xName=" value="$Name"></td></tr>
<tr><td>Telefon:</td><td><input type="text" name="xTelefon=" value="$Telefon"></td></tr>
<tr><td>Passwort:</td><td><input type="password" name="xPasswort="></td></tr>
<tr><td>test:</td><td><input type="text" name="xtest=" valve="$test"></td></tr>
<tr><td>date:</td><td><input type="text" name="xdate=" valve="$date"></td></tr>
<tr><td></td><td><input type=submit value="Abschicken"> </td></tr>
</form></table>
EOF