Opened by Martin at 2014-10-23 18:59
Hallo,
ich habe ein Textdokument, das ca wie folgt aussehen könnte:
Nun will ich die Datei in ein Array einlesen. Dabei soll der Text so zerlegt werden, dass immer, wenn eine Zeile NICHT mit einem Leerzeichen beginnt, ein neues Arrayelement beginnt. Folgendes kommt dem sehr Nahe:
Dummerweise fehlt nun aber stets der erste Buchstabe je Position. Z.B. sieht $positionen[0] jetzt wie folgt aus:
Wie kann ich die Datei wie gewünscht zerlegen?
Danke für eure Hilfe
Martin
Last edited: 2014-10-23 19:07:42 +0200 (CEST)
ich habe ein Textdokument, das ca wie folgt aussehen könnte:
Code: (dl
)
1
2
3
4
5
6
7
8
erster bla
foo bar bla
zweiter sabbel
gelaber
mehr gelaber
dritter brumm
vierter umpf
jajaja
Nun will ich die Datei in ein Array einlesen. Dabei soll der Text so zerlegt werden, dass immer, wenn eine Zeile NICHT mit einem Leerzeichen beginnt, ein neues Arrayelement beginnt. Folgendes kommt dem sehr Nahe:
Code (perl): (dl
)
1 2 3 4 5
open(DATEI, "liste.txt"); my $response = join("", <DATEI>); close(DATEI); my @positionen = split(/\n\S/, $response);
Dummerweise fehlt nun aber stets der erste Buchstabe je Position. Z.B. sieht $positionen[0] jetzt wie folgt aus:
Wie kann ich die Datei wie gewünscht zerlegen?
Danke für eure Hilfe
Martin
Last edited: 2014-10-23 19:07:42 +0200 (CEST)