<loop code=perl db=3DTetris Datum=~August sort=-Punkte,Datum range=0,10>
out "<tr>";
out "<td><div align=\"center\">", ++$cnt, "</div></td>";
out "<td><div align=\"center\">", $Name, "</div></td>";
out "<td><div align=\"center\">", $Level, "</div></td>";
out "<td><div align=\"center\">", $Punkte, "</div></td>";
out "<td><div align=\"center\">", $Anzahl, "</div></td>";
out "<td><div align=\"center\">", $Ebenen, "</div></td>";
out "<td><div align=\"center\">", $Datum, "</div></td>";
out "</tr>";
</loop>