Thread Laufende Nummer eines Keys finden
(9 answers)
Opened by bianca at 2011-03-01 13:06
Guten Tag Zusammen!
Stehe mal wieder ganz leicht auf dem Schlauch und bitte um Hilfe. Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 #!/usr/bin/perl -w use strict; use warnings; my %hash = ( 100 => 'foo', 200 => 'bar', 300 => 'foobar', 400 => 'foofoo', 500 => 'barbar', ); my $test = '300'; my $nr = grep {$_ eq $test} keys %hash; print "Laufende Nr. $nr\n"; 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? Danke Euch Editiert von bianca: Typo Last edited: 2011-03-01 13:08:15 +0100 (CET) 10 print "Hallo"
20 goto 10 |