<div dir="ltr">Só mais uma dica:<div><br></div><div>As expressões regulares de Perl são muito práticas, mas em alguns casos mais simples pode ser eficiente resolver o problema na "força bruta":</div><div><div><br>
</div><div><div>  for my $i (0 .. length($line) - 1) {</div><div>    my $char = substr($line,$i,1);</div><div>    $nucleotides{$char}++;</div><div>  }</div><div><br></div><div>No benchmark que eu fiz, o código acima é quase três vezes mais rápido do que com expressões regulares -- o que pode ser significativo se você estiver lidando com vários megabytes de dados.<br>
</div><div><div><br></div></div><div>Aqui está o código do benchmark:</div><div><br></div><div>    <a href="https://gist.github.com/anonymous/2914d6494253eec53f91">https://gist.github.com/anonymous/2914d6494253eec53f91</a><br>
</div><div><br></div><div>(Tem um pequeno bug que deixo como exercício para o leitor :D)</div><div><br></div></div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 16 de julho de 2013 18:38, Rafael Silveira <span dir="ltr"><<a href="mailto:dev.silveira@yahoo.com" target="_blank">dev.silveira@yahoo.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="font-size:12pt;font-family:times new roman,new york,times,serif"><div>Obrigado pela dica Andre.</div><div>
Quem sabe num futuro próximo, quando eu estiver mais "envolvido" com bioinformática eu utilizarei essas bibliotecas para trabalho.</div><div>Atualmente estou só estudando mesmo, praticando e tentando melhorar minhas habilidades com Perl. =)</div>
<span class="HOEnZb"><font color="#888888"><div><br></div><div style="font-style:normal;font-size:16px;background-color:transparent;font-family:'times new roman','new york',times,serif">[]'s</div>  </font></span></div>
</div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><div><br></div>-- <br>Nelson Ferraz
</div>