<p><form action='baseportal.pl?htx=/klassenliste' method='post' enctype='multipart/form-data'>
 <input type=hidden name='cmd=' value='search'></input>
 Klasse: <input type="text" NAME="klasse"~=></input>
 <input type="submit" value="Klassenliste anzeigen" name="Submit"></input></form></p>

<perl>
if($klasse)
{
out<<EOF;
<p>Alle Einträge der Datenbank mit klasse = $klasse:</p>
EOF

while(get_next("liste"))
  {
    out "$Name<br>";
  }
}
</perl>