<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman,new york,times,serif;font-size:12pt"><div>Bom Pessoal.. :)<br>Surgiu outra dúvida.<br><br>tenho uma expressao assim:<br>if($linha=~ /^(\w\w)(\w\w)(\w\w\w\w)(\w\w)(\d\d).*/)<br>{<br><br>if(eval $result)<br>{<br><br><br>}<br><br>}<br><br><br>O meu result depende da opcao do usuario:<br>Ex: <br>opcap eq "busca" -- $result="\$1 eq \"UO\" && \$2 eq \"LL\""; ---> se for simples assim funciona... mas ex: se eu quiser colocar mais de uma opcao para o $1 nao funciona<br><br>ex: $result="((\$1=~ /^(UO|GO|GL)/) && (\$2 =~ /(LL|OG|OB)))"; <br><br><br>Não tem como usar 2 expressoes regulares??????<br><br>Att,<br>Ana<br></div><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><font size="2"
face="Tahoma"><hr size="1"><b><span style="font-weight: bold;">De:</span></b> Andre Carneiro <andregarciacarneiro@gmail.com><br><b><span style="font-weight: bold;">Para:</span></b> Cascavel Perl Mongers <cascavel-pm@pm.org><br><b><span style="font-weight: bold;">Enviadas:</span></b> Quarta-feira, 8 de Setembro de 2010 20:08:28<br><b><span style="font-weight: bold;">Assunto:</span></b> Re: [Cascavel-pm] Res: Duvida IF<br></font><br>Esse é para o Fernando... esqueci de dizer pra quem era... mals!<br><br><div class="gmail_quote">Em 8 de setembro de 2010 17:07, Andre Carneiro <span dir="ltr"><<a rel="nofollow" ymailto="mailto:andregarciacarneiro@gmail.com" target="_blank" href="mailto:andregarciacarneiro@gmail.com">andregarciacarneiro@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Ela está querendo um if dinâmico. Então ela precisa passar uma expressão já avaliada para que o if entenda o que ela quer comparar. Talvez tenha outra maneira de fazer isso com com sub {}, por exemplo . Alguém se habilita a dar outras soluções ???<div>
<br></div><div><br></div><div>Cheers!<br><div><br></div><div><br><br><div class="gmail_quote">2010/9/8 Fernando Oliveira <span dir="ltr"><<a rel="nofollow" ymailto="mailto:fernandocorrea@gmail.com" target="_blank" href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div><div></div><div class="h5"><p>Pq não $var = $la == $le; ?</p>
<p></p><blockquote type="cite"><div>On Sep 8, 2010 4:37 PM, "Alceu R. de Freitas Jr." <<a rel="nofollow" ymailto="mailto:glasswalk3r@yahoo.com.br" target="_blank" href="mailto:glasswalk3r@yahoo.com.br">glasswalk3r@yahoo.com.br</a>> wrote:<br><br><br>
<br>
----- Mensagem original ----<br>
> De: Gabriel Vieira <<a rel="nofollow" ymailto="mailto:gabriel.vieira@gmail.com" target="_blank" href="mailto:gabriel.vieira@gmail.com">gabriel.vieira@gmail.com</a>><br>
<p><font color="#500050">> Para: Cascavel Perl Mongers <<a rel="nofollow" ymailto="mailto:cascavel-pm@pm.org" target="_blank" href="mailto:cascavel-pm@pm.org">cascavel-pm@pm.org</a>></font></p>> Enviadas: Quarta-feira, 8 de Setembro de 2010 16:06:56<br>
<p><font color="#500050">> Assunto: Re: [Cascavel-pm] Duvida IF<br>> </font></p></div><p><font color="#500050"></font></p><font color="#500050"><div>> Não entendi. Posta o código junto?<br></div>> Se estiveres usando o 5.10 ou mais recente, existe o Switch ...</font><p>
</p><div>
Elegante! Mas se ela não tiver perl 5.10 é possível emular o switch com uso de<br>
blocos com nomes: <a rel="nofollow" target="_blank" href="http://www.cs.cmu.edu/afs/cs/user/rgs/mosaic/pl-compound.html">http://www.cs.cmu.edu/afs/cs/user/rgs/mosaic/pl-compound.html</a>.<br>
<br>
[]'s<br>
<font color="#888888">Alceu<br>
</font></div><p><font color="#500050"><br><br><br> <br>_______________________________________________<br>Cascavel-pm mailing list<br>Cascavel-pm@pm.or...</font></p></blockquote><p></p>
<br>_______________________________________________<br>
Cascavel-pm mailing list<br>
</div></div><div class="im"><a rel="nofollow" ymailto="mailto:Cascavel-pm@pm.org" target="_blank" href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
<a rel="nofollow" target="_blank" href="http://mail.pm.org/mailman/listinfo/cascavel-pm">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></div></blockquote></div><br><br clear="all"><div class="im"><br>-- <br>André Garcia Carneiro<br>
Analista/Desenvolvedor Perl<br>
(11)82907780<br>
</div></div></div>
</blockquote></div><br><br clear="all"><br>-- <br>André Garcia Carneiro<br>Analista/Desenvolvedor Perl<br>(11)82907780<br>
</div></div>
</div><br>
</body></html>