Wie ersetze ich einen String mit einer Escape-Sequenz in einer Datei mit Perl?

Question

Wie ersetze ich einen String in einer Datei mit Perl?

perl -pi -e 's/Arun/Brun/g' * 

dies funktionierte gut für mich

aber als ich versuchte class/students/a-class1/students1/B es wirft Fehler zu ändern, wie dieses Problem zu lösen ..ich Backslash versucht Zugabe (\) vor jeder (/), aber es nicht

perl -pi -e 's/class/students/a/class1/students1/B/g' * 

Answer 1

Sie verwenden / als regex Begrenzer helfen.
Es gibt / sogar in Ihrem Muster und Ersatz. Sie müssen irgendwie sicherstellen, dass diese / nicht als Trennzeichen behandelt werden sollten.

Sie haben zwei Möglichkeiten:

1. die / in Ihrem Muster Flucht und Ersatz wie:

   perl -pi -e 's/class\/students\/a/class1\/students1\/B/g' * 
   

2. Oder ein anderes Trennzeichen verwenden:

Methode 2 ist bevorzugt, da es Ihre Regex kurz und sauber hält.

Answer 2

Versuchen perl -pi -e 's{class/students/a}{class1/students1/B}g' *

Von perldoc perlop:

Alle Nicht-Leerzeichen Begrenzer kann die Schrägstriche ersetzen. Fügen Sie Leerzeichen nach s hinzu, wenn Sie ein Zeichen verwenden, das in Bezeichnern erlaubt. (...) Wenn das PATTERN durch Klammern Anführungszeichen abgegrenzt wird, hat der ERSATZ seine eigenen Anführungszeichen, die Anführungszeichen sein können oder nicht, zB s (foo) (bar) oder s/bar /.

Answer 3

Danke Perldoc perlop:

Mein Problem ist changin Oracle Startseite von Ihrem Befehl lösen. Ein weiterer Trick, den ich mit der Shell-Variable ersetzt habe.

export ORACLE_HOME=/oracle/product/11.2.0.3/db_1 

perl -pi -e 's{REPLACEWITHORACLEHOME}{'$ORACLE_HOME'}g' filename 

mehr scripted Weg ist:

for y in `ls`;do perl -pi -e 's{REPLACEWITHORACLEHOME}{'$ORACLE_HOME'}g' $y;done