search & replace in Textfile - #143021 (Allgemeines zu Perl)

topeg

2010-11-24 02:34

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Dann kann man es auch so schreiben:

Code (perl): (dl )

($^I,$/) = ("");
$_=<>;
s/vorher/nachher/g;
print;

Damit hat noch ein paar Zeichen gespart. ;-)