push(@dritte_Zeile, "\t \t"); push(@dritte_Zeile, "Minimum \n"); while (<$fh>) { my @split = split(/,/, $_); print "$split[3]\n"; #da steht dann beispielsweise spalte drei drin }