put if %_put; 

{
  get "Id==$Id";

  if($xName)
  {
    if($Passwort eq $xPasswort)
    {
      mod "Id==$Id", ["Name",$xName,"Telefon",$xTelefon,"Bundesland",$xBundesland];
      out "<b>Eintrag ge&auml;ndert...</b>";
    } else
    {
      out "<b>Passwort falsch!</b>";
    }
  } else
  {
    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>
<td>Telefon:</td><td><input type="text" name="xTelefon=" value="$Telefon"></td>
<td>Bundesland:</td><td><input type="text" name="xBundesland=" value="$Bundesland"></td>

<tr><td></td><td><input type=submit value="Abschicken"> </td></tr>
</form></table>
EOF

  }