Foro - Perl en Español

Hola a todos.

¿Alguien sabe cómo puedo comprobar si un string (para mi caso $linea[1] (está partida con split)) empieza con unos caracteres en concreto?

Lo que quiero hacer es comprobar si dicho campo ($linea[1]) empieza por 0,1 o 2.

Muchas gracias por vuestra colaboración.

Sí, hay varias formas:



O usando expresiones regulares:

que quiere decir que si $linea1[0] comienza (^) por alguno de los caracteres ([]) del '0' al '2'.

Ya ves que las expresiones regulares son algo muy útil.

Muchas gracias por tu respuesta.

¿Para obtener un mejor rendimiento a la hora de parsear un log serían mejor las expresiones regulares verdad?

En ese caso, lo mejor agregar la opción /o, para que Perl optimice la expresión regular para todos las líneas:

explorer escribiste:En ese caso, lo mejor agregar la opción /o, para que Perl optimice la expresión regular para todos las líneas:

Sintáxis: [ Descargar ] [ Ocultar ]

Sintáxis: [ Descargar ] [ Mostrar ]

Using perl Syntax Highlighting

$linea1[0] =~ /^[0-2]/o

Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

/o no hace nada si la expresión no contiene ninguna variable.

/o solo significa algo si usas unas variables en la expresión:



Sin /o, Perl cada vez lee el contenido de esta variable y compila la expresión; con /o solo lee el contenido la primera vez, compila la expresión y después usa la misma expresión incluso cuando la $busqueda ha cambiado su contenido.

Sí, Jenda. Tienes razón.

¿Crees que en ese caso sería mejor study?