Hola a todos....
Tengo la siguiente línea
document.write('<A HREF="http://ad.doubleclick.net/jump/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" target="_top"><IMG SRC="http://ad.doubleclick.net/ad/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" width="728" height="90" border="0"></A>');
Necesito buscar en esta línea donde esta la palabra "target", pero que sole me guarde la siguiente parte, que es donde encontro la palabra "target"
<A HREF="http://ad.doubleclick.net/jump/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" target="_top">
Como lo puedo hacer?
Gracias... y espero de su colaboración...
-
- Publicidad
Busqueda en una cadena
6 mensajes
• Página 1 de 1
Busqueda en una cadena
por julruiz » 2005-11-17 17:00 @750
- julruiz
- Perlero nuevo
- Mensajes: 18
- Registrado: 2005-09-11 20:55 @913
Publicidad
por explorer39 » 2005-11-19 06:09 @298
- Código: Seleccionar todo
#!/usr/bin/perl
$x = q(document.write('<A HREF="http://ad.doubleclick.net/jump/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" target="_top"><IMG SRC="http://ad.doubleclick.net/ad/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" width="728" height="90" border="0"></A>\'););
# Buscar en $x la primera marca html (<...>) que contiene un 'target'
($y) = $x =~ m/(<.+?target.+?>)/;
print $y;
- explorer39
por kidd » 2005-11-19 09:11 @424
explorer39 escribiste:
- Código: Seleccionar todo
#!/usr/bin/perl
$x = q(document.write('<A HREF="http://ad.doubleclick.net/jump/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" target="_top"><IMG SRC="http://ad.doubleclick.net/ad/co.terra.enter/home728;ga=serv_co;niv=0;abr=!ie;sz=728x90;tile=1;ord=' + ord + '" width="728" height="90" border="0"></A>\'););
# Buscar en $x la primera marca html (<...>) que contiene un 'target'
($y) = $x =~ m/(<.+?target.+?>)/;
print $y;
Cambiando tu ejemplo para que se vea un poco más limpio, podría ser:
- Código: Seleccionar todo
if($x =~ m/(<.+?target.+?>)/){
$y = $1;
}
SALUDOS
-
kidd - Creador de Perl en Español
- Mensajes: 1166
- Registrado: 2003-10-15 16:52 @744
- Ubicación: México
por Perl user » 2005-11-19 15:10 @673
Aunque ambos comentarios son acertados, hay un problema con las recomendaciones...
Parsear HTML así directamente es tan malo como jugar con fuego... a menos que estés 100% seguro que la manera en la que te presentan el texto es SIEMPRE la misma, entonces parsearlo así es satisfactorio, sin embargo, como se sabe HTML tiene diferentes versiones, muchos cambios y también está XHTML; las construcciones pueden cambiar ( incluyendo mayúsculas y mezclas entre ambos ).
Lo recomendado es utilizar algún módulo existente que haga todas y cada una de esas validaciones para evitar tener dolores de cabeza en la depuración ante un fallo.
Saludos,
Parsear HTML así directamente es tan malo como jugar con fuego... a menos que estés 100% seguro que la manera en la que te presentan el texto es SIEMPRE la misma, entonces parsearlo así es satisfactorio, sin embargo, como se sabe HTML tiene diferentes versiones, muchos cambios y también está XHTML; las construcciones pueden cambiar ( incluyendo mayúsculas y mezclas entre ambos ).
Lo recomendado es utilizar algún módulo existente que haga todas y cada una de esas validaciones para evitar tener dolores de cabeza en la depuración ante un fallo.
Saludos,
- Perl user
- Maestro honorario
- Mensajes: 271
- Registrado: 2004-11-03 21:11 @924
6 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados