<div>Vamos por partes:</div><div><br></div>Alexei, não, o objetivo é pegar começando com STR1 ou contendo STR2. Do jeito que fez, acho que vai ser preciso sempre começar com STR1 ou STR2.<div><br></div><div>Solli, sim, o resultado é o mesmo. Se a linha não começar com STR1 e não contiver STR2 ele imprime. Juntar duas negativas para dar um resultado positivo é pegajoso. Realmente ficou horrível.<div>
<br></div><div>Fernando, você está certo. A STR2 até pode começar a linha, mas não é obrigatório.</div><div><br></div><div>Neilson, segundo o Eden, Seu Morgan disse que tá certo (e funcionou). :)</div><div><br></div><div>
Eden, usei a condição na forma negada pois, como sempre, a coisa foi sendo adaptada de outros testes, feitos por outras pessoas, e na hora eu nem me toquei em inverter e usar um unless.</div><div><br></div><div>Como foi um job pontual, mesmo em 7 minutos já tava valendo. Só fiquei curioso se podia melhorar, já que logo apareceram os bacalhoeiros do awk+grep+raio+q+oparta dizendo que eram mais rápidos!</div>
<div><br></div><div>:P</div><div><br></div><div>Obrigado!</div><div><br></div><div>[]s, MM</div><div><br></div><div><br><div class="gmail_quote">Em 17 de março de 2010 21:12, Eden Cardim <span dir="ltr"><<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">2010/3/17 Eden Cardim <<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>>:<br>
<div class="im">> Não está errado, !/^string1/ && !/string2/ é equivalente a /^string1/<br>
> || /string2/, pelas leis de De Morgan, se não me engano, o Perl<br>
> otimiza isso (a versão sem negação é mais rápida). Falta saber porque<br>
> a preferência por expressar a condição na forma negada.<br>
<br>
</div>Hm, parece que não otimiza, eu me lembro que tinha visto o Perl mecher<br>
em operadores short-cut rodando com -MO=Deparse, mas ele faz outra<br>
otimização, não essa.<br>
<div><div></div><div class="h5"><br>
--<br>
Eden Cardim Need help with your Catalyst or DBIx::Class project?<br>
Code Monkey <a href="http://www.shadowcat.co.uk/catalyst/" target="_blank">http://www.shadowcat.co.uk/catalyst/</a><br>
Shadowcat Systems Ltd. Want a managed development or deployment platform?<br>
<a href="http://edenc.vox.com/" target="_blank">http://edenc.vox.com/</a> <a href="http://www.shadowcat.co.uk/servers/" target="_blank">http://www.shadowcat.co.uk/servers/</a><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" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
</div></div></blockquote></div><br></div></div>