gibts in PERL keine mehrdimensionalen Arrays?

[Philipp Hasenfratz]

Halihallo Andreas

Danke Dir! Perl ist doch einfacher als man glaubt ;-)

Jaja :-)

Habe aber noch ein Problem, wie bekomme ich in PERL mehrdimensionale Arrays?

@test = (['t', 't2'], ['t3', 't4']);

So sieht mein Versuch aus, vergleichbar funktioniert das zumindest in PHP, aber push funktioniert bei PERL anscheinend anders, es wird nicht der jeweils neue Array als Wert des Elements gespeichert, sondern der neue Array wird einfach an den ursprünglichen angehängt.

@zeilen = <DATAFILE>;
    foreach(@zeilen){
     push @data_array, split('/|/',$_) ;
}

@zeilen = <DATAFILE>;
my @data_array;
foreach (@zeilen) {
   my @new_items = split /|/;
   push @data_array, [@new_items];
}

Und noch eine Frage: Muß ich eigentlich den Array @data_array vorher irgendwie initialisieren? Oder kann ich das einfach so machen?

wenn du mit use strict arbeitest, musst du es vorher initialisieren. Aber du meinst wohl, dass es nur "Arrays" aufnimmt. Nein, dafür musst du einfach eine Referenz in @data_array pushen. Die Referenz legst du an, indem du [@new_items] schreibst. Das gibt dann eine Pointer/Referenz auf einen anonymes Array. So werden Multidimensionale Datenstrukturen angelegt.

Viele Grüsse

Philipp