Thread Aus Textdatei nach bestimmten Wort Wörter auslesen (16 answers)
Opened by Gast_13 at 2013-09-12 12:32

payx
 2013-09-12 12:58
#170137 #170137
User since
2006-05-04
564 Artikel
BenutzerIn

user image
Hallo Gast_13,

Guest Gast_13
Gibt es da evtl ein Regex, womit man Worte auslesen kann?

Du kannst auch hier split verwenden.

Vielleicht hilft Dir dieser Vorschlag? (Frag nach, wenn Du etwas nicht verstehen solltest.)
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

#!/usr/bin/perl

use strict;
use warnings;

my $words = 0;

while (<DATA>) {
    
    my @wds = split(/[^\w.]+/, $_);
    
    print join "; ", @wds[2..$#wds];
    print "\n";
    
    $words += scalar(@wds)-2;
    
}

print("words=$words\n");

__DATA__
.SUBCKT D1N4148 Anode1 Kathode1 foo
.SUBCKT D1N4248 Anode2 Kathode2 foo bar
.SUBCKT D1N4348 Anode3 Kathode3
.SUBCKT D1N4448 Anode4 Kathode4 foo
.SUBCKT D1N4548 Anode5 Kathode5 foo bar
.SUBCKT D1N4648 Anode6 Kathode6
.SUBCKT D1N4748 Anode7 Kathode7 foo
.SUBCKT D1N4848 Anode8 Kathode8 foo bar
.SUBCKT D1N4948 Anode9 Kathode9

HTH
Grüße
payx

View full thread Aus Textdatei nach bestimmten Wort Wörter auslesen