Foro - Perl en Español

saludos.

Espero puedan ayudarme con este problema a resolver.

Tengo este código HTML, el cual necesito extraer el valor de "id". Ejemplo: af9fcc5a872af09fcb36da6cbf56ee2c
Y guardarlos en un array para utilizarlos en otro método.

Por favor, si alguien puede darme un ejemplo.

Gracias.

Sería algo así, pero, te repetimos, necesitas aprender algo, aunque sea básico, de expresiones regulares.

Tengo una dudas.

Me sugieren esta línea: my @id = $html =~ /id=(.+?)\&/g;

¿No sería lo mismo si lo realizo con un while()?

Según lo que entendí por lo sugerido debería ser así. ¿El $html tendría el todo el contenido html?

my @id = $html =~ /id=(.+?)\&/g)

Sí, el resultado se puede hacer con un while().

Y $resultado contiene toda la página. ¿No has hecho la prueba de sacarla en pantalla para ver qué contiene?

Cuidado con el operador avaricioso ".*": se "comerá" toda la línea e irá buscando hacia atrás. Es mejor usar la variante no-avariciosa ".*?\&", que quiere decir que "coma" todo lo que encuentre, pero que se pare justo antes del siguiente '&'.

Muchas gracias. Continuando este hilo, tengo este registro en un archivo .log


Necesito extraer todas las direcciones de correo electrónico y contar aquellas que más se repiten.

Los dominios pueden ser:
*.* = com.bo, com.pe, com.edu., com.org || *.edu, *.org, etc. || .com , .bo, etc.

Estoy intentando para extraerlos algo así:

La idea es contar los repetidos y separarlos en un arreglo.

Ya que las direcciones están detrás de un número, se podría usar algo como esto:

El patrón busca por una cifra, seguida por un espacio en blanco, y captura todos los caracteres distintos de espacio en blanco que siguen.

Para controlar repeticiones, los almacenas en un hash, y listo.