[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