Array auf einen Hash zuweisen

[Struppi]

Oweh ich glaub ich hab die Bücher nicht richtig gelesen.
Also erklären kann ich's die nicht wirklich:

my @a = (A..Z); # ein Array

my %h; # Ein Hash

$h{test} = @a; # Eine Referenz auf das Array

$i = 0;

foreach ( @{$h{test}} ) # so wird aus der Referent wieder ein Array
{
print "$i = $h{test}->[$i]\n"; # oder auch
        print "$i = $_\n";
        $i++;
}

oder

$test = $h{test};

dann ist:

@$test

auch ein Array.
Wenn man's mal kapiert hat mit den geschweiften und eckigen Klammern, dann kann man tolle sachen mit machen.

Rätsel um Rätsel.

Struppi.