<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>