Laufende Nummer eines Keys finden (gelöst) - #146139 (Allgemeines zu Perl)

clms

2011-03-01 13:23

User since
2010-08-29
373 Artikel
BenutzerIn
[default_avatar]

2011-03-01T12:06:23 bianca
Wie bekomme ich es hin, dass hier das Ergebnis 2 geliefert wird, weil der Key 300 als Array betrachtet der Eintrag [2] ist?
grep allein geht nicht, das liefert 1, verstehe ich auch, weil es in diesem Kontext die Anzahl liefert. Wie bekomme ich das andere hin?

Erstmal würde ich die Keys in ein geordnets Array überführen:

Code (perl): (dl )

my @sortedkeys = sort keys %hash;

(keys %hash liefert die Keys in zufälliger Reihenfolge.)

Dann kannst Du in dem Array nach dem passenden Index suchen, z.B.

Code (perl): (dl )

1
2

my $nr = 0;
$nr++ while $sortedkeys[$nr] < $test;

(ungetestet)