for (@array) { my @array2 = split( /\n/ , $_ ); push @{ $hash{key} } , \@array2; # Referenz auf das Array # oder push @{ $hash{key} } , [ @array2 ]; # Referenz auf Kopie des Array - in diesem Beispiel ist's egal. }