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

René G. Morales D. renemorales@directo.cl
Wed, 07 Aug 2002 09:44:08 -0400 (CLT)


> Lista,

> Como le puedo hacer para cambiar un string en todos los archivos que te=
ngo en=20
> un directorio??...

> Saludos,
> Luis

Una vez tuve un problema parecido, necesitaba cambiar el t=EDtulo=20
(<TITLE>TITULO</TITLE>) de "n" archivos o p=E1ginas html.

lo que hice fue un script que leyera el contenido del directorio donde se=
=20
encontraban los archivos y los almacenaba en una @lista.
despu=E9s con un foreach()
le indique a perl que me cambiara la tercera l=EDnea por mi variable
$nueva_linea=3D"<TITLE>Nuevo T=EDtulo</TITLE>.

Nota: Al construir los archivos HTML, me preocupe que siempre fuere la te=
rcera=20
l=EDnea la del <TITLE>.

salu

-------------------------------------------------
This mail sent through IMP: webmail.directo.cl