[quote=supersucker,25.04.2005, 21:29]

pq,_

einfache gegenfrage: was erwartest du bei folgendem code?
$hash{key} = 23;
$hash{key} = 24;
print $hash{key};

hast ja recht, aber ich hatte das problem mittlerweile schon öfter das ich identische schlüssel gebraucht hätte ohne mir da erst ein komplexes speicherkonstrukt zu überlegen, kann mir nicht vorstellen das ich da der einzige bin....
[/quote]
Nein, aber Perl macht es recht einfach, beliebige Datenstrukturen aufzubauen. Wie schon genannt: siehe perldoc perldsc.

Quote

und bei obigem beispiel könnte sowas
wie

Quote

print $hash{key};

bei mehreren identischen schlüsseln auch eine liste zurückgeben (kann man ja je nach kontext vorher kucken ob man ne liste oder ein skalar zurückkriegt....)

ich persönlich fänds praktisch...

Ah, eine Liste! Was du hier suchst, ist also statt
Schluessel => skalarer Wert
ein
Schluessel => Listen-Wert

Das ist ganz einfach, denn die Liste bekommen wir, wenn der Hashwert eine Arrayreferenz ist:

Hier wird fuer das push() von Perl automatisch eine Arrayreferenz in $hash{key} angelegt, damit ich diese mit @{...} dereferenzieren kann.

Ich kann auch alle Werte auf einmal zuweisen, indem ich gleich eine Referenz auf ein (anonymes) Array zuweise:

Hier ist der Wert im Hash eine Referenz auf ein anonymes Array, das auf der rechten Seite des Gleichheitszeichens steht, in eckigen Klammern.

Man kann es natuerlich auch gleich dereferenziert schreiben, dann stehen links und rechts der Zuweisung jeweils Arrays und keine Referenzen (hier wird also der Inhalt eines Arrays in ein anderes kopiert!):


Also: Speichere einfach fuer alle Schluessel Arrayreferenzen als Werte, dann koennen alle zu einem Schluessel gehoerenden Zahlen in dieses Array gespeichert werden.

[quote=supersucker,25.04.2005, 21:29]...

Quote

print $hash{key};

bei mehreren identischen schlüsseln auch eine liste zurückgeben (kann man ja je nach kontext vorher kucken ob man ne liste oder ein skalar zurückkriegt....)[/quote]
ja, aber das musst du halt erst mal definieren. kann ja keiner ahnen.
jetzt, wo du's definiert hast, hast du ja von dubu die entsprechende
antwort bekommen.
wenn du jetzt mit tie() arbeitest, kannst du das ganze sogar ohne push()
implementieren, so dass alles wie ein ganz normaler hash mit einem
level aussieht.

hui,

ok, dass man das auch so machen konnte, wusst ich nicht...

bin anscheinend noch nicht weit genug in die tiefen von perl vorgedrungen........:-)

zu den letzten drei posts:

danke für die hilfe, werd ich mal so probieren