Probleme mit mehrdimensionalen Arrays - #144174 (Allgemeines zu Perl)

topeg

2011-01-07 13:37

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

In drei Dimensionen:

Code (perl): (dl )

my @feld=(
    [
      [1, 2],
      [3, 4],
    ],
    [
      [5, 6],
      [7, 8],
    ],
  );

Man kann das auch über Schleifen machen:

Code (perl): (dl )

my @feld;
my @daten=(1..8);
for my $z (0,1)
{
  for my $y (0,1)
  {
    for my $x (0,1)
    {
      $feld[$z][$y][$x]=shift(@daten);
    }
  }
}