Dann musst Du auch my %hash2 schreiben.

Das Sigil % zeigt, dass es ein Hash ist, das Sigil $ ein Skalar.

Bei my $hash2 = %{shift} versuchst Du ein Hash in einen Skalar zu pressen.

Bei my $hash2 = shift; wird dem Skalar $hash2 das erste Element der Parameterliste zugewiesen (in diesem Fall eine Hashreferenz).

ah oki, verstehe.. ich glaub endlich hab ich mal den krams mit den referenzen hier geblickt.. Bin im buch noch nicht soweit (Programmieren mit Perl(bisher übrigens weiter zu empfehlen..)).

hab die änderungen alle vorgenommen und nun funktioniert das soweit, aber was ich nicht weiss ist wie ich nen hash wieder leere.. also bei meiner
if($dokuart ne $old_doc){
${$hash2}{$old_doc}=\%hash;
%hash={};
}
abfrage will ich den hash wieder leeren, das scheint aber so nicht zu gehn.wie kann ich sagen dass ich den hash wieder leeren will um ihn dann mit neuen elementen zu füllen?

Du kannst den Hash so leeren:

aber das wird evtl. dein Problem nicht lösen, denn ich nehme an, du möchtest dabei nicht gleichzeitig den Inhalt von $hash2->{$old_doc} auch löschen.

$hash2->{$old_doc} enthält aber keine Kopie von %hash, sondern eine Referenz auf %hash, d.h. alle Änderungen an %hash ändern auch $hash2->{$old_doc}.

Es gibt zwei Möglichkeiten, das zu umgehen: Erstens kann man den Hash bei der Zuweisung einfach kopieren. Das geht so:

Hier wird rechts durch die geschwungenen Klammern eine Referenz auf einen anonymen Hash geschaffen, der mit dem Inhalt von %hash gefüllt wird.

Die zweite Möglichkeit ist, %hash nur in einem kleinen Scope zu deklarieren, sodass er automatisch jedesmal neu angelegt wird. Das benutzt man oft mit Schleifen:

Dadurch, dass %hash in der Schleife deklariert ist, wird er bei jedem Schleifendurchgang neu angelegt. Weil der "alte" Inhalt aber irgendwo in $grosse_datenstruktur noch referenziert wird, wird er nicht freigegeben.

Statt einer Schleife kann hier genauso eine Subroutine stehen, die lokal %hash deklariert und die Referenz irgendeiner anderen Datenstruktur zuweist.

[quote=shaihulud,25.05.2006, 10:27]my $hash2 = %{shift};[/quote]
Hallo shaihulud,

letzte Woche erst habe ich mir den Abschnitt Kontext durchgelesen
und kann ihn nur weiterempfehlen, um ein klares Verständnis für
Operationen zu erhalten.

Falls du die Perlbibel nicht hast, dann hier ein paar Schlagwörter:

Skalarer- und Listenkontext
Boolescher Kontext
Void Kontext
Interpolativer Kontext

Viele Grüße,
opi

Edit:
ich muss zugeben, dass ich das Kapitel 4 Mal lesen musste, bis ich alles
richtig verstanden habe, vorallem die Geschichte mit dem verkappten
Kommaoperator :)\n\n

<!--EDIT|opi|1148557149-->

danke dubu. ich habs mit der kopie auf die referenz gemacht und es funktioniert! :)
ich würd mir echt gern die zeit nehmen mich mit all dem mehr auseinander zu setzen(wie gesagt larry walls buch hab ich schon gekauft)... vielleicht finde ich in den kommenden semesterferien zwischen den prüfungen zeit... in der zwischenzeit bedanke ich mich für die hilfe bei solchen problemen!

(find übrigens dass dies das beste forum ist in dem ich je gepostet hab!)

@ opi, welche bibel meinst du? ich hab wie gesagt nur "Programmieren mit Perl"..