Wie kann ich eine neue, leere Hash-Referenz in Perl erstellen?

Question

Sagen wir, ich hatte so etwas wie:

# %superhash is some predefined hash with more than 0 keys; 
%hash =(); 
foreach my $key (keys %superhash){ 
    $superhash{ $key } = %hash; 
    %hash =(); 
} 

würde alle Tasten von superhash auf den gleichen leeren Hash von %hash zugegriffen oder sie würden anders leer Hashes sein?

Wenn nicht, wie kann ich sicherstellen, dass sie auf leere Hashes zeigen?

Answer 1

Sie müssen den Operator \ verwenden, um einen Verweis auf mehrere Datentypen (Array oder Hash) aufzunehmen, bevor Sie ihn in einem einzigen Slot speichern können. Aber in dem Beispielcode, der angegeben wird, wäre jeder, wenn er referenziert wird, derselbe Hash.

Die Art und Weise der Datenstruktur zu initialisieren ist:

foreach my $key (keys %superhash) { 
    $superhash{ $key } = {}; # New empty hash reference 
} 

Aber Initialisierung wie dies weitgehend unnötig in Perl aufgrund autovivification (Schaffung geeigneter Objekte Container, wenn eine Variable als ein Behälter verwendet wird).

my %hash; 

$hash{a}{b} = 1; 

Jetzt %hash hat einen Schlüssel, 'a', die einen Wert von einem anonymen hashref hat, b => 1 den Schlüssel/Wert-Paar enthält. Arrays autovivify in der gleichen Weise.