Subsitution de strings avec perl

On peut utiliser sed mais il faut faire la manip en deux fois alors qu'avec perl un simple :
 perl -ni -e 's/chaine-a-remplacer/chaine-de-remplacement/g;print'   fichier1 fichier2
 fera l'affaire.
  perl -ni -e 's/chaine-a-remplacer/chaine-de-remplacement/g;print'   fichier1 fichier2

Commentaires

1. Le lundi, mars 23 2009, 10:16 par cjovet

A noter que s'il s'agit d'une simple substitution de caractère(s), tr ou y sera plus rapide, soit :

perl -pi -e 'tr/caractere-a-remplacer/caractere-de-remplacement/;' fichier1 fichier2

Remarque : l'option -p remplace le print; dans la ligne de code ;-)