[Rio-pm] range de números em regexp

Marco A P D'Andrade mdacwb em gmail.com
Quarta Junho 7 14:56:58 PDT 2006


mda em supsv06:~$ perl -e '$numero = "Eu tenho 61 anos";
($numero =~ m!([25-60])!)?(print "achei -->> $1!\n"):(print "babou!\n");'
achei -->> 6!


eh... babou :(

Dentro de ER [] só implementa parte:
    [30] => 30
    [25-70] -> 2567


mda em supsv06:~$ perl -e '$numero = "Eu tenho 62 anos";
($numero =~ m!([25-60])!)?(print "achei -->> $1!\n"):(print "babou!\n");'
achei -->> 6!


Sds,
Marco Antonio


Fernando wrote:

>>fernando em ubuntu:~$ perl -e '$numero = "Eu tenho 61 anos";
>>($numero =~ m![25-60]!)?(print "achei!\n"):(print "babou!\n");'
>>achei!
>>fernando em ubuntu:~$
>>_______________________________________________
>>Rio-pm mailing list
>>Rio-pm em pm.org
>>http://mail.pm.org/mailman/listinfo/rio-pm
>>
>>    
>>
>Robson Mothé wrote:
>
>  
>
>>Hum...
>>
>>Só hoje que eu ví essa mensagem!
>>Que tal tentar:
>>
>>$numero = 6;
>>($numero =~ m![5-9]!)?(print "achei!\n"):(print "babou!\n");
>>
>>ou
>>
>>$numero = "Eu tenho 25 anos";
>>($numero =~ m![10-30]!)?(print "achei!\n"):(print "babou!\n");
>>
>>Perl trabalha de duas maneiras com o átomo dentro do "[]", vale para
>>uma interseção de valores dentro da tabela ASC ou para uma interseção
>>de valores:
>>
>>abcdef = [a-f];
>>abcdefABCDEF = [a-fA-F];
>>10,11,12,13...30 = [10-30].
>>
>>Testem aí depois me falem!
>>
>>Um forte abraço,
>>
>>
>>Robson
>>
>>    
>>




Mais detalhes sobre a lista de discussão Rio-pm