<do action=all fullsearch_match=500 ....>

<perl>
#-----------Volltextsuche ---------
if ($cmd eq "do_search")
{ 
out <<EOF;
<form action="baseportal.pl?htx=$htx&sort=-Id" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="$htx">
<font face="Verdana" size="2">Volltextsuche:</font> 
<input type="text" name="_fullsearch~~" value="$_fullsearch" size="20" style="font-family: Verdana; font-size: 10pt; border: 1px solid #C0C0C0">
<input type="submit" value="Suchen" style="font-size: 8pt; font-family: Arial; border: 1px solid #FFFFFF; background-color:#00C400">
</form>
EOF
}
</perl>

<perl>
if ($cmd eq "do_search")
{ 
out "<b>Rassen:</b><br>";

out "<a title=\"Anglo-Nubier-Ziegen...\" href=\"$_link&sort=-Id&_fullsearch==Anglo-Nubier-Ziegen\">Anglo-Nubier-Ziegen</a> ";

out "<br";

}
</perl>