my $zaehler="0";

$statement = "SELECT name,punkte,id FROM user ORDER BY punkte DESC";
$sth = $dbh->prepare( $statement ) || die "Kann Statement nicht vorbereiten: $DBI::errstr\n";
$sth->execute || die "Kann Abfrage1 nicht ausfuehren: $DBI::errstr\n";

while(my @daten = $sth->fetchrow_array()) {
$zaehler++;

my $ausgabe = $ausgabe.$daten[0].$daten[1].$daten[2];

if ( $zaehler > 10 ) {
print $ausgabe;
$ausgabe="";
$zaehler="0";
}

}
$sth->finish;