Thread Zeilen ausschneiden und in neue Datei einfügen (10 answers)
Opened by ruby at 2013-08-01 12:19

Gast ruby
 2013-08-01 13:57
#169275 #169275
Das ist natürlich ebenfalls ein guter Vorschlag, hab mein Script nun erweitert und es schaut nun so aus:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

#!/usr/bin/perl
use warnings;
use strict;

my $i = 0;

open IN, 'alt.txt' or die "ERROR!\n";
open OUT, '> neu.txt' or die "ERROR!\n";
open OUT2, '> neu2.txt' or die "ERROR!\n";

while (<IN>)
{
        if (m/Tech Univ Dresden/){ 
            print OUT;
        }
                
                else{
                print OUT2;
                }
}
close IN;


Jetzt brauch ich bloss die alte Datei mit der neuen zu ersetzen und es läuft!
Last edited: 2013-08-01 14:01:02 +0200 (CEST)

View full thread Zeilen ausschneiden und in neue Datei einfügen