<loop sort=- convert_html=Titel code=perl range^=0,5>
out<<EOF;
                  <table width="500" border="0" cellspacing="0" cellpadding="0" bgcolor="#000000">
                    <tr>
                      <td>
                        <table width="100%" border="0" cellspacing="1" cellpadding="5" align="center">
                          <tr>
                            <td bgcolor="#FFFFFF"><a href="http://baseportal.de/cgi-bin/baseportal.pl?htx=/kleinanzeigen/detail&db=inserat&cmd=all&Id==$_id"><font size="2">$Titel</font></a>
                            </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table><p>
EOF
                  </loop>
                  <perl>

my $oldrange=$_range-$_range_length;
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;
out "[ <a href=\"$_link&range=$oldrange,$_range_length\">Vorherige Beiträge</a> ]" if $oldrange>=0;
out "[ <a href=\"$_link&range=$newrange,$_range_length\">Weitere Beiträge</a> ]" if $newrange<$_amount_all;
</perl>

out "[ <a href=\"$_link&range=$oldrange,$_range_length\">Vorherige Beiträge</a> ]" if $oldrange>=0;