<perl>
get "Kategorie==*","main";
while(get_next(main))
{
$optionen{$Kategorie}++;
}
 
foreach (keys %optionen)
{
out "<tr><td><a href='$_link&Kategorie==$_' class='navlinks' >$_</a></td></tr>";
}
</perl> 

 wo fehlt was?

$append ="&Kategorie~=$_sel{Kategorie}" if $_sel{Kategorie};
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

if ($_amount != 0)
 
{
$bis = $_range + $_range_length;
    $von = $_range + 1;
    out "Einträge $von bis \n";
    if ($bis < $_amount_query)
       {
        out "$bis von $_amount_query\n";
       }
    else
       {
        out "$_amount_query von $_amount_query";
       }
  }
out "[ <a href=\"$_link&range=$newrange,$_range_length$append\">Weitere Einträge</a> ]" if $newrange<$_amount_all;