<body bgcolor="#ffffff">
<table border="0" cellpadding="2" cellspacing="0" width="528">
<tr>
<td valign="top" align="left" width="200"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">$Bild</font></td>
<td bgcolor="#b3b3b3" valign="top" width="150"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2"><b>$Beschreibung</b></font></td>
<td bgcolor="#b3b3b3" valign="top" width="150"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">im Katalog auf Seite:<br>
</font><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">$Katalog</font></td>
</tr>
<tr>
<td bgcolor="#37c95c" width="200"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">Artikelnummer:<br>
</font><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2"><b>$Artikelnummer</b></font></td>
<td bgcolor="#37c95c" width="150"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">Für:<br>
</font><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2"><b><i>$Hersteller</i></b></font></td>
<td bgcolor="#37c95c" width="150"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">Grifftyp<br>
</font><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">$Grifftyp</font></td>
</tr>
<tr>
<td bgcolor="#b3b3b3" width="200"><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2">$Waffentyp</font></td>
<td bgcolor="#b3b3b3" width="150"></td>
<td bgcolor="#b3b3b3" width="150"><font size="2" face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular"><b>DM</b></font> <font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular" size="2"><b>$VK</b></font></td>
</tr>
</table> <p></p>
</loop>
<perl>
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;