#! /usr/bin/perl use strict; use warnings; use Data::Dumper; # datei oeffnen, etc.; als Beispiel wird hier die DATA Sektion ausgelesen my @lines; while ( my $line = ) { chomp $line; # umbruch entfernen # splitte Zeile am Trenner ' ', erzeuge anonymen Array # und fuege Referenz darauf in Array @lines. # AoA: Array-of-Array push @lines, [ split m{ }, $line ]; } print Dumper \@lines; __DATA__ Ich weiss nix. Ist dies falsch? Oder vielleicht richtig?