open (FILE,"datei.txt");
$i=0;
foreach $row (<FILE>) {
   $file->[$i] = \split(/\s/,$row);
   $i++;
}

print Dumper($file);
close(FILE);