Verarbeitung eines Hashes mit Arrayinhalten in Perl
Dieser Artikel beschreibt wie man einen Hash mit zugewiesenen Arraywerten auf verschiedene Art und Weise darstellt, Werte abgreift, und nach Kriterien sortiert ausgibt.
Beispielcode für verschiedene Ausgaben
Dem Beispiel zugrunde liegt dieser Hash mit Arraywerten:
%member = ( 1 => ["2004.02.02" ,"M" ,"Walter", "Helmut", "Deutschland"], 2 => ["2003.12.28" ,"W" ,"Meyer" , "Lisa", "Deutschland"], 3 => ["2002.05.22" ,"M" ,"Müller", "Maximilian", "Schweiz"], 4 => ["2002.11.01" ,"M" ,"Lehmann", "Hubert", "Oesterreich"], 5 => ["2004.01.04" ,"W" ,"Schulze", "Stefanie", "Deutschland"], 6 => ["2002.06.09" ,"M" ,"Wolter", "Willy", "Oesterreich"], 7 => ["2004.01.17" ,"W" ,"Thomas" , "Eva-Maria", "Schweiz"], 8 => ["2001.09.04" ,"M" ,"Schneyder", "Jean", "Frankreich"], 9 => ["2002.11.17" ,"M" ,"Clerc", "Pascale", "Frankreich"], 10 => ["2003.08.10" ,"M" ,"Benguerel", "Sebastian", "Spanien"], 11 => ["2002.10.01" ,"W" ,"Carl", "Johanna", "Deutschland"], );
1. Festellung der Schlüsselanzahl des Hashes
print $anz = keys(%member);
Ausgabe = 11
2. Festellung der Anzahl der Hashwerte zum Schluessel 4
print $#anzahl = (@{$member{4}});
Ausgabe = 5
3. Sortierte Ausgabe der Hashschschlüssel mit ausgewählten Werten
foreach $key (sort { $a <=> $b } keys %member) { print "$key - $member{$key}[0] - $member{$key}[4]<br>"; }
Ausgabe:
1 – 2004.02.02 – Deutschland
2 – 2003.12.28 – Deutschland
3 – 2002.05.22 – Schweiz
4 – 2002.11.01 – Oesterreich
5 – 2004.01.04 – Deutschland
6 – 2002.06.09 – Oesterreich
7 – 2004.01.17 – Schweiz
8 – 2001.09.04 – Frankreich
9 – 2002.11.17 – Frankreich
10 – 2003.08.10 – Spanien
11 – 2002.10.01 – Deutschland
4. Sortierte Ausgabe der Hashwerte nach Kriterien
foreach $key (sort { $member{$a}[2] cmp $member{$b}[2] } keys %member) { print "$member{$key}[2], $member{$key}[3]<br>"; }
Ausgabe:
Benguerel, Sebastian
Carl, Johanna
Clerc, Pascale
Lehmann, Hubert
Meyer, Lisa
Müller, Maximilian
Schneyder, Jean
Schulze, Stefanie
Thomas, Eva-Maria
Walter, Helmut
Wolter, Willy
5. Per Join die Arraywerte eines Schlüssels in ein anderes Array ablegen
print @dd = join(' ', (@{$member{2}}));
Ausgabe: 2003.12.28 W Meyer Lisa Deutschland
Weitere Beiträge
Letzter Tag: Amazon Black Friday Deals für Technik-Liebhaber

Die Black Friday Woche bei Amazon endet heute, und Technik-Liebhaber sollten jetzt zugreifen. Für Betreiber von Webseiten oder Kreative gibt es viele spannende Angebote. Von leistungsstarken Laptops bis hin zu Software-Lizenzen finden Sie heute zahlreiche reduzierte Produkte. Auch Zubehör wie kabellose Tastaturen, externe Festplatten oder USB-Hubs sind oft günstiger erhältlich.
Meta Quest 3: Entdecken Sie das aktuelle VR-Headset

Die Meta Quest 3 ist das aktuelle Mixed-Reality-Headset von Meta, das innovative Technologien vereint, um ein einzigartiges VR-Erlebnis zu bieten. Diese VR-Brille stellt sowohl für Gelegenheitsnutzer als auch für Technikenthusiasten eine aufregende Möglichkeit dar, die Grenzen zwischen der physischen und digitalen Welt zu erkunden. Eine echte Alternative zur Apple Vison Pro. Wer etwas günstiger in […]
Amazon Prime Deal Days: Günstige Hardware-Angebote für Technikfans

Amazon bietet während der Prime Deal Days besonders günstige Hardware an. Das beliebte Shopping-Event läuft vom 8. bis 9. Oktober. Prime-Mitglieder dürfen sich auf exklusive Rabatte und Angebote freuen. Besonders Technikfans kommen in diesen zwei Tagen voll auf ihre Kosten.
Amazon-Vergleichstabellen erhöhen die Affiliate-Einnahmen

Amazon-Vergleichstabellen: Wer im Internet kaufen will, vergleicht zunächst Preise und Produkteigenschaften. Hier ist bei vielen Interessenten Amazon die erste Wahl. Gleichzeitig bietet der Branchenriese ein interessantes Partnerprogramm für Empfehlungen an. Wer sich damit ein zusätzliches Einkommen sichern möchte, bietet seinen Besuchern spezielle Amazon-Vergleichstabellen auf seiner Webseite an. So findet der Kunde schneller die relevanten Informationen […]
Keine Kommentare vorhanden