nicht angemeldet
Hi,
open(TXT,"name.txt") or die "Fehler beim Öffnen";
es_kann_los_gehen = false;
while ($line = <TXT>) {
if (es_kann_los_gehen) {
print $line;
}
if ($line eq "<!--test-->") {
es_kann_los_gehen = true;
}
}
Dieser Code ließt das File Zeile für Zeile ein. Falls die gewünschte Zeile eingelesen wurde, wird
es_kann_los_gehen auf true gesetzt. Bei jeder Zeile wird
außerdem zuerst überprüft, ob diese Variable schon true
ist - wenn ja, dann wird die Zeile ausgegben.
Grüße
fredy
Ich moechte mit Perl eine Datei (Textdatei) auslesen. Wichtig ist jedoch, dass nur die Daten der Datei die nach dem wort <!--test--> folgen ausgelesen werden
Eine kleiner Parser also. Ganz einfach: Ohne jetzt einen Code zu liefern - Such den String <!--test--> ... splitte an der Stelle .... wirf den ersten Teil weg ... uebrig bleibt das Was Du willst.
Viele Gruesse