Suchergebnis mit Position

[Lifestyle]

Hallo,

ich habe mal wieder ein PERL Problem.
Ich suche innerhalb einer Datei einen Eintrag herraus.
Die Stelle an der das Ergebnis gefunden wurde soll dann ersetzt werden. Dazu benöige ich jedoch die Position des Suchergebnisses innerhalb der Datei.

Ich finde leider keinen Weg diese zu ermitteln.

Hat einer von euch da eine Idee ??

MFG
L!f3

[hotti]

hi,

Ich finde leider keinen Weg diese zu ermitteln.

Reicht Dir die Zeilennummer? Die steht in "$."

Hotte

[Siechfred]

Ich suche innerhalb einer Datei einen Eintrag herraus. Die Stelle an der das Ergebnis gefunden wurde soll dann ersetzt werden. Dazu benöige ich jedoch die Position des Suchergebnisses innerhalb der Datei.

Abgesehen von Hottes Hinweis braucht man diese Position eigentlich nicht. Es wäre daher sinnvoll, wenn Du genau beschreiben könntest, was Du machen willst und wie Dein Code bisher aussieht.

Siechfred

[Reiner]

Ich suche innerhalb einer Datei einen Eintrag herraus. Die Stelle an der das Ergebnis gefunden wurde soll dann ersetzt werden. Dazu benöige ich jedoch die Position des Suchergebnisses innerhalb der Datei.

Abgesehen von Hottes Hinweis braucht man diese Position eigentlich nicht. Es wäre daher sinnvoll, wenn Du genau beschreiben könntest, was Du machen willst und wie Dein Code bisher aussieht.

genau!

Quick and dirty:

öffnen und lesen

open(alt, "alte_datei");
while ($line = <in>) {
  $message .= $line;
}
close alt;

suchen und ersetzen

$message =~ s/alter_text/neuer_text/g;

schreiben

open(neu, ">neue_datei");
print neu $message;
close neu;

lg
Reiner