nicht angemeldet
Huhu
Aber - wie in meinem Fall - viel komplizierter zu notieren. Ich will nicht in Pointern denken, sondern in meinen eigenen Datentypen.
Jeder wie er mag. *g*
Jawoll, das scheint es zu sein - so kann's gehen, wenn man zum ersten Mal einen komplexen Typ zu dereferenzieren versucht ... wieder was gelernt ... nein, die Perl-Doku ist nicht wirklich intuitiv ...
Wem sagst Du das... ;-(
Syntaktisch tut es schon mal - ob auch semantisch, das werde ich sehen, wenn die Umgebung fertig ist.
(Momentan bastele ich erst mal die Bausteine, der "Leim" kommt später - im wesentlichen will ich Paare solcher Dateien miteinander verschmelzen - wobei derzeit jeweils erst mal zwei Hashes pro Zeile eingesetzt werden -, und das aufgrund einer einzulesenden Regeldatei ...).
Vielen Dank - und toi toi toi für den synchronisierten Poster!
(Mail mir doch mal, ob Du nur flock() reingemacht hast oder doch irgendwas Heftiges in Richtung Client-Server, wie zuvor andiskutiert ...)
Nee, das Heftige wollten wir ja noch auf spaeter verschieben. Habe eigentlich nicht mehr gemacht als noetig. Ich schicks Dir nachher mal, wenn ich at home bin.
Ach ja, eine Frage fällt mir in diesem Kontext noch ein: Kann ich ganz "intuitiv" einen Hash of Hashes aufbauen und verwenden? (In Pascal könnte ich solche Fragen alle beantworten - außer Dateien kann man dort alles in alles schachteln.)
Ok, kleiner Ausholer:
@liste = (1, 2, 3); # Zugriff: $liste[0] == 1
$listref = [1, 2, 3]; # Zugriff: $listref->[0] oder ${$listref}[0] (vereinfacht: $$listref[0])
%hash = (
'key1' => 'value1', # Zugriff: $hash{'key1'} eq 'value1'
'key2' => 'value2',
'key3' => 'value3'
);
$hashref = {
'key1' => 'value1', # Zugriff: $hashref->{'key1'}
'key2' => 'value2', # oder: ${$hashref}{'key2'} (vereinfacht: $$hashref{'key2'})
'key3' => 'value3'
};
Wie Du siehst, liefern die Operatoren [] bzw. {} jeweils eine Referenz (welche an sich ein Skalar ist) auf eine anonyme Liste bzw. einen anonymen Hash zurueck.
Wie Du sicher schon gehoert hast, baut man Lists of Lists und Hashes of Hashes dadurch, dass z.B. eine Masterliste lauter Referenzen auf Sub-Listen beinhaltet. Da die [] und {} genau solche Referenzen liefern, kann man also ohne Probleme schreiben:
@listoflist = (
[1, 2, 3], # Zugriff: ${$listoflist[0]}[0] == 1
[4, 5, 6], # oder: $listoflist[1]->[0] == 4
[7, 8, 9] # vereinfacht: $listoflist[2][0] == 7
);
%hashofhash = (
subhash1 => {
'key1' => 'value1', # Zugriff: ${$hashofhash{'subhash1'}}{'key1'} eq 'value1'
'key2' => 'value2', # oder: $hashofhash{'subhash1'}->{'key2'} eq 'value2'
'key3' => 'value3' # vereinfacht: $hashofhash{'subhash1'}{'key3'} eq 'value3'
},
subhash2 => {
'key4' => 'value4',
'key5' => 'value5',
'key6' => 'value6'
},
subhash3 => {
'key1' => 'value7', # $hashofhash{'subhash3'}->{'key1'} eq 'value7'
'key2' => 'value8',
'key3' => 'value9'
}
);
Mehr davon gibt's dann in der perldsc manpage.
Insbesondere muß ich einen Pointer auf einen der gehashten Hashes (der dann einer Dateizeile entspricht) als Parameter an die erwähnte Funktion übergeben dürfen - und ich habe was gelesen, daß Pointer auf Hash-Elemente irgendwie wegen impliziter Typkonversion in Perl nicht funktionieren soll
Meinst Du das?
$sh3ref = $hashofhash{'subhash3'};
$$sh3ref{'key2'} eq $sh3ref->{'key2'} eq 'value8';
... ein Hash of Hashes würde mir vielleicht einiges ersparen, denn bisher beabsichtige ich, ihn zu emulieren (Hash of Strings, und bei Verwendung dann den String mit der Modulfunktion separat hashen und mit der aus der zweiten Datei gerade gelesenen Partner-Zeile verschmelzen).
Mmh, musst Du sehen, was Dir besser gefaellt. HoH's sind vermutlich speicherintersiver, HoStrings brauchen vielleicht mehr Zeit?
Kleiner Spass am Rande:
print( { 1 => 1, 2 => 4, 3 => 9, 4 => 16, 5 => 25 } -> {$number} );
Wie funktioniert das Ding? ;-)
Calocybe