String suchen und ersetzen in Perl

Hallo Leute,

ich habe eine Frage bzgl String suchen und ersetzen in Perl.
Ich will in einer Textfile z.B. nach dem String var=1000 suchen, falls dieser gefunden wird, soll nicht der komplette String ersetzt werden,sondern nur 1000.Ich habe absolut keine Ahnung wie ich das Patter-Matching definieren soll.

Wäre echt nett,wenn mir jemand helfen könnte.

Vorab vielen Dank!

Gruß bones1

Hallo,

es gibt mehrere Möglichkeiten:

# benötigt Perl 5.10.0 oder neuer
$string =~ s/var=\K/1000/neuerWert/;

# geht auch mit aelteren Versionen, ist
# aber nicht so einfach zu lesen und nicht so flexibel:
$string =~ s/(?

benötigt Perl 5.10.0 oder neuer

$string =~ s/var=\K/1000/neuerWert/;

perl 5.10.0 sagt mir:
Bareword found where operator expected at -e line 3, near „s/var=\K/1000/neuerWert“

sollte wahrscheinlich heissen:
s/var=\K1000/neuerWert/