Community  »  Perl: Allgemeines Forum

String Matching	Seitenanfang
Hallo, ich habe eine Datei mit mehreren Zeilen und Spalten... z.B. sehen die Zeilen so aus: 1.0 0 1.27 2.0 0 1.29 3.0 7 1.41 4.0 0 1.75 Wie kann ich denn die 3 Spalte "ausfiltern" und in eine Datei speichern ? Ich bin ein Anfgänger, hatte was programmiert aber funktioniert nicht richtig.. Kann mir jemand helfen bitte ? Grüße, Alfred Datum: 14.12.2008-10:58
re: String Matching	Seitenanfang
my $file = '/pfad/zur/datei.txt'; my $output = '/pfad/zur/ziel.datei'; open my $fh, '<', $file or die $!; open my $ofh, '>', $output or die $!; while( my $line = <$fh> ){ my @cols = split /\s+/, $line; print $ofh $cols[2],"\n"; } close $ofh or die $!; close $fh; Datum: 15.12.2008-07:57