[perl] array of hashes und foreach

Gast #2324805
Lesenswert?
• ▲
▼
Hallo,

ich werde gerade wahnsinnig. :-/
1
my @arr;
2

3
push (@arr, {"aa"=>1, "bb"=>2, "cc"=>3});
4
push (@arr, {"aa"=>11, "bb"=>22, "cc"=>33});
5
push (@arr, {"aa"=>111, "bb"=>222, "cc"=>3333});
6

7
#ok
8
print $arr[0]{"aa"};
9

10
#ok
11
foreach (0..$#arr)
12
{
13
  print $arr[$_]{"aa"},"\n";
14
}
15

16
#fehler
17
foreach (@arr)
18
{
19
  print $_{"aa"},"\n";
20
}
Wie muss die letzte print-Anweisung richtig lauten? Ich hab schon zig 
Varianten probiert mit {} und () aber nichts geht.
Gast #2324856
Lesenswert?
• ▲
▼
Danke! Schnelle Hilfe, so kenne ich das Forum. :-)

Da soll nochmal jemand sagen C wäre schwer und obfuscated und so...
1
$id=~s/%([[:xdigit:]]{2})/chr(hex($1))/ge;
2
$info{(split(/=/))[0]}=(split(/=/))[1] foreach (split(/&/, $id));
 waaahhh!
Gast #2324897
Lesenswert?
• ▲
▼
Noch eine Frage:

Wenn ich in C auf einen Tastendruck warten will (egal welche Taste!!) 
nehme ich conio.h/getch(). Was nimmt man in perl? Google findet da nur 
so kompliziertes Zeugs was alles nicht funktioniert (unter Windows), man 
muss immer Enter drücken.

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren