Foro - Perl en Español

Recién estoy aprendiendo esto de las expresiones regulares, así que estoy haciendo algunos ejercicios para ver cómo me manejo con esto.

Tengo un ejercicio el cual le paso por parámetros varios nombres y el programa solo me tiene que mostrar aquellos nombres que contienen "Ale" o "ale" en cualquier parte del nombre.

Para hacerlo más simple, usé el array @ARGV para tomar los argumentos. Hasta ahí todo va bien, pero cuando uso la expresión no sé cómo guardar el nombre cuando la expresión es correcta, sino que me muestra todos los nombres que ingresé.

¿¿Alguno me puede dar un mano??

Ya lo resolví. En vez de hacer una expresión regular utilicé grep(), es mucho más fácil. El ejercicio no pedía qué usar pero yo quise usar expresiones regulares y se me estaba complicando mucho así que me decidí por grep() y así quedó:

Una expresión regular se debe aplicar a un valor escalar, en este caso, $name.

El operador es el =~ (o el !~ en caso de que queramos negar el resultado).

En el lado derecho se suele poner el operador de coincidencia m// o el de sustitución s/// o el de transliteración tr/// (y///). Como el operador m// es muy común, se suele simplificar a solo //. (Más información en tu propio ordenador en perldoc perlop, y en la Web (traducido al español), sección Operadores Regexp entrecomillados).

Dentro de los delimitadores, hay un patrón de exp. reg. En este caso, usamos el carácter '|' para separar alternativas, y los paréntesis para capturar en $1, $2, etc. lo que se encuentre.

Tienes un buen resumen de las expresiones regulares en la página de Wikipedia, en perldoc perlre (traducido al español), y un manual en perlretut (todavía no terminado de traducir).

grep() viene fenómeno para hacer filtros, así que viene bien para este ejercicio.

Gracias, explorer, por la respuesta. Me estaba complicando mucho haciendo la exp. reg. y no me di cuenta que era muy fácil.

Te corrijo en una cosa, yo no quería imprimir lo que contiene el resultado de la expresión regular sino el nombre de acuerdo a lo capturado, es decir, que si me encuentra "Ale" me imprima "Alejandro".

Con solo cambiar print "$1\n"; por print "$name\n"; se arregla eso.

Gracias de nuevo.

Saludos.

Hola,

Si usas expresiones regulares usando el modificador "i" te ahorras escribir dos veces el patrón.

¡Perdón por abrir de nuevo el tema!

Hola.

También soy nuevo en esto del Perl.

Al final nadie ha respondido a la pregunta. Entiendo que grep es una opción pero imagino que con una expresión regular también es posible, ¿no?

¿Alguien sabe cómo?

Porque la expresión que indica la veo correcta. Debería funcionar, ¿no?

Saludos

Sí, una expresión regular se puede usar tanto en un if() como en un grep(), ya que el resultado de la expresión regular es un valor booleano.

Si miras los códigos de más arriba, verás que se usa de las dos maneras.