Foro - Perl en Español

¡Hola de nuevo!

Gracias a todos, porque esta web me está sirviendo de gran ayuda. Os lo estimo mucho.

La duda que tengo ahora es cómo utilizar "split" sin que "coma" nada; esto es, si tengo una cadena como ésta:



¿Cómo puedo hacer para crear un array con elementos que empiecen en "a", las 'a' incluidas? Esto es:



Si pongo @array_cadena = split (/a/, $cadena), ¡me come todas las 'a'!

¿Es posible hacer esto?

Gracias...

Bueno, ya me respondo yo...

He encontrado la solución en una web: basta con poner paréntesis en la parte / / del split. Voilà...!

Los paréntesis no te sirven... lo que hacen es crear nuevos elementos en el array, con esas 'a' como elementos separados. Los paréntesis sirven para guardar los delimitadores aparte de los elementos divididos.

Esta es una solución... aunque... un poco tramposa...

Si no hay delimitadores no usa split(), usa regexps.

Hola, yo tengo un rollo similar: tengo que hacer una comparación sha1 de un archivo zip que descargo. Lo que sucede es que el sitio de donde lo descargo colocan el sha1 dentro del nombre del mismo archivo zip y éste queda algo similar así:

Código: Seleccionar todo

Nombrefecha.xml.zip.0000aaaaaabbbb000000.xxxx

Si nos fijamos bien el nombre del archivo está separado por 4 puntos, el cual pensé sería el carácter delimitador, yo estoy tratando de hacer un script que me lea el nombre del archivo y meta ese nombre en una cadena, la separe y me tome solo en cuenta 00000aaaaaaabbb00000 (este número siempre cambia pero esta parte es la que trato de leer) Una vez separada meta este valor en una variable para yo poder compararlo con el sha1 que ya logro sacar.

He estado usando split pero no logro llegar a los caracteres que necesito.