Hash-Zuweisungen... - #71664 (Allgemeines zu Perl)

topeg

2006-11-12 15:15

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Grundsätzlich ja, aber nicht so wie du es versuchst. Du brauchst dafür anonyme Hashes bzw. Referenzen auf Hashes.

Code: (dl )

my %hash=('key1' => 'val1', 'key2' => 'val2');

Das ist schon mal ein guter Anfang.
Nun kannst du daraus die Referzen ziehen:

Code: (dl )

my $hash_ref=\%hash;

oder gleich einen anonymen Hash erzeugen:

Code: (dl )

my $hash_ref={'key1' => 'val1', 'key2' => 'val2'}

das kannst du dann in einen anderen Hash packen:

Code: (dl )

my $hash2{'key_a'}=$hash_ref;

Oder das ganze in einem Durchgang:

Code: (dl )

$hash2{'key_a'}={'key1' => 'val1', 'key2' => 'val2'};

Man kann es auch noch weiter zusammenziehen:

Code: (dl )

%hash2=(
         'key_a'=>{'key1' => 'val1', 'key2' => 'val2'},
         'key_b'=>{'key3' => 'val3', 'key4' => 'val4'}
         # ...
        );