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