<! --- ab hier Routine Such-ERGEBNIS -------------------------------------------------------------------------------------->

          <table align=center cellspacing=1 cellpadding=2 width=600 border=0>

          <perl>
          get "gpkkat2==$gpsuchkat", "gpkat";
          </perl>

          <tr><td colspan=3 align=center><img src=http://www.guidepark.de/bilder/$gpkbild border="1"></td></tr>
          <tr><td colspan=3 align=center><font face="verdana" color=#FFFFFF size=1>&nbsp;Suche nach:&nbsp;$gpsuchkat</font></td></tr>

          <tr bgcolor=#000080>
          <td><font face="verdana" color=#FFFFFF size=1>&nbsp;Rubrik</font></td>
          <td><font face="verdana" color=#FFFFFF size=1>&nbsp;Stichwort</font></td>
          <td><font face="verdana" color=#FFFFFF size=1>&nbsp;Beschreibung</font></td></tr>

          <loop db=gpurl gpkat1==$gpsuchkat | gpkat2==$gpsuchkat | gpkat3==$gpsuchkat & gpukat1~=$gpsuchukat | gpukat2~=$gpsuchukat | gpukat3~=$gpsuchukat & gpurl~=$gpurl & gpbes1~=$gpbes1 sort^=gpkat1,gpkat2,gpukat1,gpukat2,gpbes1 code=perl>
          $auskat =  $gpkat1.", ".$gpkat2." ".$gpkat3;
          $ausukat = $gpukat1." ".$gpukat2." ".$gpukat3;

          out <<EOF;
          <tr bgcolor=#cccccc>
          <td><font color=#000080 face="verdana" size=1>&nbsp;$auskat</td>
          <td><font color=#000080 face="verdana" size=1>&nbsp;$ausukat</td>
          <td><a href="http://baseportal.de/cgi-bin/baseportal.pl?htx=/gpark/gpurldet&cmd=all&Id==$_id"><font color=#000080 face="verdana" size=1>&nbsp;$gpbes1</a></td>
          </tr>

          </loop>

          <perl>
          init "gpurl";
          out "<font face=verdana size=1 color=#ffffff>&nbsp;";
          out "$_amount_query";
          out " Einträge gefunden ";
          out "</font>";
          </perl>
     
          </table>