[Perl] Cambiando un string en varios archivos...

Daniel Sol dsllaven@ife.org.mx
Tue, 06 Aug 2002 18:43:37 -0600


Saludos!

Como una de las cosas que mas presumimos los perleros son los=20
"milagritos" que se pueden hacer con programillas de una linea (Casi=20
invocaciones directas de Perl) y asumiendo que la pregunta ven=EDa de un=20
novato (al menos la UNAM esta de vacaciones).

Asi que, por ejemplo, para cambiar la cadena "baca" por "vaca" en todo...

perl -pi.bak -e 's/baca/vaca/g' /directorio/*

En realidad es un programa de una l=EDena, esa l=EDnea es la que est=E1 e=
ntre=20
comilla simple despues del par=E1metro -e de Perl.

Los parm=E1metros -pi.bak dice que Perl abra cada archivo indicado al=20
final, y procese cada linea, editando la l=EDnea con lo indicado por el -=
e=20
y almacenando el archivo original en una copia .bak.

Revisa la referencia con los par=E1metros de Perl para ver los detalles.

Con gusto por los cl=E1sicos: Daniel Sol

Jose Antonio Galicia wrote:

> On Tue, 6 Aug 2002, Luis Medrano Zaldivar wrote:
>>Como le puedo hacer para cambiar un string en todos los
>>archivos que tengo en un directorio??...
>  Perd=F3n, pero no tenemos la costumbre hacer la tarea de
> nadie (o de menos yo no la tengo). Lo que hacemos cas=ED