Thread In Perl mehrere Zeilen zwischen Strings einer Textdatei auslesen? (13 answers)
Opened by Jan at 2023-02-07 04:50

Gast Jan
 2023-02-07 23:24
#194668 #194668
Ja – sorry habe mich nicht präzise genau ausgedrückt! Die Konfig.txt ist folgendermaßen aufgebaut:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21


… ziemlich viele Zeilen mit uninteressantem Inhalt ….


Wort1 Wort2 $string1                 # diese Zeile wird verändert wieder ausgegeben
0 bis 4 Zeilen mit Text …
Wort3 Wort4 <2-5stellige Zahl>   # die Zahl1 wird noch mehrmals für ausgaben benötigt


… ziemlich viele Zeilen und dann eine sehr ähnliche Aufgabe nur das diesmal die auszulesende Zeile VOR dem $String1 steht:

Wort5 <anderer String>       # dieser string darf nicht ausgelesen werden (steht >1 Stellen von $string1 entfernt)
Wort5 <String2>                    # String2 wird später benötigt (steht vor dem $string1)
. 
…einige Zeilen

Wort6 Wort7 $string1           # Zeile die den Suchstring $string1 enthält

…Weitere Zeilen…
.

Dann folgen die Ausgaben (das sollte ich hinbekommen)! Die Wörter1-7 stehen für eindeutige Konfigurationsanweisungen. Danach kann ich also suchen. Nur die „Nachbarschaft“ der auszulesenden Zeilen zum Suchstring ist das komplizierte da es die Zeilen auch noch mit anderem Inhalt gibt, aber eben auf andere und nicht auf den Suchstring bezogen.
Das ist auch wieder ziemlich umständlich erklärt, aber einfacher ist es nicht. Die weiteren angepassten Suchen und Ausgaben sollte ich dann selber hinbekommen! DANKE für Eure Mühe!
Viele Grüße Jan
Last edited: 2023-02-08 08:04:44 +0100 (CET)

View full thread In Perl mehrere Zeilen zwischen Strings einer Textdatei auslesen?