# Anzahl der Zeilen einlesen:
    my $sql = qq{ SELECT id FROM unternehmensdb $filter $order };
    my $sth = $dbh->prepare( $sql ); 
    $sth->execute();
    my $anzahl = $sth->rows;
    $sth->finish();