while(my $zeile = ) { # Zeilenumbruch entfernen chomp($zeile); #die Zeile splitten und die Einzelwerte in @data speichern my @data=split(/;/,$zeile); #Das Array @data als Element in das Array @FileData schreiben. push(@FileData,\@data); }