Thread Laufende Nummer eines Keys finden (9 answers)
Opened by bianca at 2011-03-01 13:06

bianca
 2011-03-01 13:06
#146138 #146138
User since
2009-09-13
6981 Artikel
BenutzerIn

user image
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

View full thread Laufende Nummer eines Keys finden