Leser: 2
4 Einträge, 1 Seite |
1
2
3
4
for(@array){
my @array2 = split(/\n/,$_);
$hash{key} = [$hash{key},\@array2]; #hier das Array zum Value Addieren
}
$hash{xyz} = [\@array1,\@array2,\@array3,...];
1
2
3
4
5
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.
}
4 Einträge, 1 Seite |