Función Perl Array Grep ()

La función Perl grep () es un filtro que ejecuta una expresión regular en cada elemento de una matriz y devuelve solo los elementos que se evalúan como cierto. El uso de expresiones regulares puede ser extremadamente poderoso y complejo. Las funciones grep () usan la sintaxis @List = grep (Expression, @array).

Uso de la función Grep () para devolver expresiones verdaderas

@myNames = ('Jacob', 'Michael', 'Joshua', 'Mathew', 'Alexander', 'Andrew');

@grepNames = grep (/ ^ A /, @myNames);

Piense en la matriz @myNames como una fila de cuadros numerados, que van de izquierda a derecha y numerados comenzando con un cero. La función grep () recorre cada uno de los elementos (cuadros) en la matriz y compara sus contenidos con la expresión regular. Si el resultado es cierto, los contenidos se agregan a la nueva matriz @grepNames.

En el ejemplo anterior, la expresión regular / ^ A / busca cualquier valor que comience con una A mayúscula. Después de examinar los contenidos de la matriz @myNames, el valor de @grepNames se convierte en ('Alexander', 'Andrew') , los únicos dos elementos que comienzan con A mayúscula.

Invertir la expresión en una función Grep ()

Una forma rápida de hacer que esta función particular sea más poderosa es invertir la expresión regular con el operador NOT. La expresión regular busca elementos que evalúen falso y los mueve a la nueva matriz.

@myNames = ('Jacob', 'Michael', 'Joshua', 'Mathew', 'Alexander', 'Andrew');

@grepNames = grep (! / ^ A /, @myNames);

En el ejemplo anterior, la expresión regular busca cualquier valor que no comience con una A mayúscula. Después de examinar los contenidos de la matriz @myNames, el valor de @grepNames se convierte en ('Jacob', 'Michael', 'Joshua ',' Matthew ').

Sobre Perl

Perl es un lenguaje de programación adaptable que se usa con frecuencia para desarrollar aplicaciones web. Perl es un lenguaje interpretado, no compilado, por lo que sus programas ocupan más tiempo de CPU que un lenguaje compilado, un problema que se vuelve menos importante a medida que aumenta la velocidad de los procesadores. Sin embargo, escribir en Perl es más rápido que escribir en un idioma compilado, por lo que el tiempo que ahorre es suyo..