[bcn-pm] regexp dinamico

[Xavier Pegenaute]

Hola,

entiendo, pero en este caso, la configuración viene fijada externamente 
como un xml, con lo que no puedo hacer lo que si no lo he entendido mal, 
no me sirve.

Entiendo que el problema de eval, es que debería checkear que el 
contenido sea correcto, lo podría hacer sin muchos problemas. Existe 
alguna razón más por la que no os convenza usar eval? (curiosidad)

Gracias.
Xavi.
José Luis Pérez Diez wrote:
> On Friday 06 July 2007 12:04, Xavier Pegenaute wrote:
>   
>> Creo que me gusta más la solución que he encontrado, aunque esta me la
>> apunto, nunca se sabe.
>>     
>
> Yo prefiero evitar los eval.  En este caso seria como tener el fichero de 
> configuracion en formato perl ( array de hases) y cargarlo con un require
>
> Mira si esta  solucion te gusta mas (basada en la de fnx):
>
> $ cat foo.pl;perl foo.pl
> use strict;
> use warnings;
>
> my @groups = '$2:$1:$3' =~ /\d/g; # extract digits
> if (my @valor = "123 56789 hola" =~ /(\d+)\s(\d+)\s(hola)/){
>         foreach my $g (@groups) {
>                 print $valor[$g-1], "\n";}
> }else {die "gracefully";}
>
> if (my @valor = "123 56789 adios " =~ /(\d+)\s(\d+)\s(hola)/){
>         foreach  my $g (@groups) {
>                 print $valor[$g-1], "\n";}
> }else {die "gracefully";}
> 56789
> 123
> hola
> gracefully at foo.pl line 10.
> $    
> _______________________________________________
> llista dels Barcelona-pm
> Barcelona-pmapm.org
> http://mail.pm.org/mailman/listinfo/barcelona-pm
> BCN Perl Mongers: http://barcelona.pm.org
>