Buscar en HTML Re: [Perl] URGENTE: consulta

Bolo Lacertus lacertus@servidor.unam.mx
Tue, 23 Oct 2001 19:54:38 -0500


Saludos!

El truco para ello, es usar expresiones regulares, pero hay un detalle,
quiz=E1 la etiqueta comienze en una l=EDnea y termine en otra, lo que
complica todo el proceso, no se diga si quieres obtener las p=E1ginas por=

un cliente HTTP.

En fin,para el caso m=EDnimo, si la etiqueta abre y cierra en la misma
l=EDnea y solo quieres buscar en archivos locales basta con un:

while(<>)
{
 /\<title\>(.*)\<\/title\>/i
 print $1."\n";
}

Y a este programilla lo ejecutas pasandole como parametros los nombres
de los archivos a revisar.

Lo que realmente hace el trabajo es la expresi=F3n regular
/\<title\>(.*)\<\/title\>/i que indica que se busque cuanto este entre
<title> y </title> ignorando may=FAsculas y minusculas.

El while(<>) simplemente revisa cada linea de cada archivo pasado como
parametro al programa y el print manda a imprimir lo encontrado.

Esperando que el ejemplo, a pesar de estar algo obscuro, te sea de
utilidad: Daniel Sol
-- =

Bolo Lacertus: lacertus@servidor.dgsca.unam.mx		=3D=3D~\___\
http://proteo.dgsca.unam.mx/cgi-bin/lacertus/hola	 =3D__vvvv