my @vorhandene_werte; while ( my $line = <$fh> ) { chomp $line; @vorhandene_werte = split(/\s+/,$line); push (@aoa , \@vorhandene_werte); }