Hum...<br>
<br>
Só hoje que eu ví essa mensagem!<br>
Que tal tentar:<br>
<br>
$numero = 6;<br>
($numero =~ m![5-9]!)?(print "achei!\n"):(print "babou!\n");<br>
<br>
ou<br>
<br>
$numero = "Eu tenho 25 anos";<br>
($numero =~ m![10-30]!)?(print "achei!\n"):(print "babou!\n");<br>
<br>
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:<br>
<br>
abcdef = [a-f];<br>
abcdefABCDEF = [a-fA-F];<br>
10,11,12,13...30 = [10-30].<br>
<br>
Testem aí depois me falem!<br>
<br>
Um forte abraço,<br>
<br>
<br>
Robson<br>
<br clear="all">
<br>
-- <br>
Robson Mothé<br>
<a href="mailto:rmothe@gmail.com">rmothe@gmail.com</a><br>
<a href="mailto:mothe@rio.pm.org">mothe@rio.pm.org</a><br>
GNU/Linux User #318909<br>
<br>
<br><br><div><span class="gmail_quote">Em 01/06/06, <b class="gmail_sendername">Breno G. de Oliveira</b> <<a href="mailto:breno@clavis.com.br">breno@clavis.com.br</a>> escreveu:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Pessoal,<br><br>recentemente um amigo meu me apresentou o seguinte problema:<br><br>"como fazer uma ER que só case se encontrar um número dentro de um<br>intervalo/alcance/range qualquer?"<br><br>Bem - disse eu -, para fazer isso com números entre 0 e 9 é
<br>relativamente fácil. Para buscar, por exemplo, por números entre 5 e 8,<br>poderíamos usar:<br><br>/[5678]/<br><br>Mas e quando queremos encontrar números com mais de um dígito?<br><br><br>Eis, então, o problema: fazer uma ER que case SE E SOMENTE SE o valor
<br>estiver entre 16 e 34.<br><br>Em Perl 6 é fácil (aí Fernando! ;P), partindo do princípio que o RFC 197<br>foi respeitado, bastaria fazer:<br><br>/(16,32)/<br><br>mas e em Perl 5? Alguém se habilita?<br><br>obs: não vale fazer /16|17|18|19|20|21|...|29|30|31|32/ =)
<br><br><br>[]s<br><br>breno<br>_______________________________________________<br>Rio-pm mailing list<br><a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/rio-pm">http://mail.pm.org/mailman/listinfo/rio-pm
</a><br></blockquote></div><br><br>