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:
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:
Using perl Syntax Highlighting
$linea1 =~ /^$busqueda/;Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
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.