Foro - Perl en Español

por **neoranger** » 2015-01-08 09:59 @458

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??

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

use strict;
 
my $name = @ARGV;
 
foreach $name(@ARGV)
{
        #print $name . "\n";
 
        if (my $regpex =~ (/Ale|ale|/)){
                print $1 . "\n";
                }
}
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

#!/usr/bin/env perl
use strict;             # programación estricta
use warnings;           # activar advertencias
use diagnostics;        # activar explicación de advertencias
 
my $name;                       # declaramos una variable escalar
     
for $name (@ARGV) {             # para cada argumento...
    #print "$name\n";
     
    if ($name =~ m/(Ale|ale)/) {        # ¿$name contiene Ale o ale?
        print "$1\n";                   # sí, pintamos lo capturado por los paréntesis
    }
}
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

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.

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#!/usr/bin/env perl
use strict;
my @b = grep { /Ale|ale/ } @ARGV;
print "@b\n";
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **neoranger** » 2015-01-08 11:19 @513

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.

por **Aceitunas** » 2015-01-22 12:52 @578

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!

por **migbur** » 2015-01-28 09:24 @433

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

por **explorer** » 2015-10-03 06:17 @304

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.

Foro - Perl en Español

Problema con expresión regular sencilla

Problema con expresión regular sencilla

Publicidad

Re: Problema con expresión regular sencilla

Re: Problema con expresión regular sencilla

Re: Problema con expresión regular sencilla

Re: Problema con expresión regular sencilla

Re: Problema con expresión regular sencilla

Re: Problema con expresión regular sencilla

¿Quién está conectado?