12345678910111213141516
$j=2;push(@zweite_Zeile, "\t");push(@zweite_Zeile, "Anzahl\n");my $second_line = <$fh>;@second_col = (split(/,/,$second_line)); while ($j<40){ #print "$second_col[$j]\n";push(@zweite_Zeile, "\t $second_col[$j] \n");$j=$j+2; }print "@zweite_Zeile";