Vc está usando um map em contexto void, o map guarda o array de resposta na memoria...<br><br><div class="gmail_quote">2009/2/20 Lucas Mateus <span dir="ltr">&lt;<a href="mailto:lucasmateus.oliveira@gmail.com">lucasmateus.oliveira@gmail.com</a>&gt;</span><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Estou em uma situação prática em que tenho um ARRAY com 750.000 itens, cada item deve se submeter a 60 RegExp, obtendo match faço um next.<br>

<br>
Os dois codigos abaixo (o mais simples que consegui representar) fazem a mesma coisa, porem o EXEMPLO_1 tem performance extremamente inferior que o EXEMPLO_2.<br>
<br>
Gostaria de saber dos Mongers justificativa para isso. Seria a RegExp dinâmica ?<br>
<br>
<br>
<br>
EXEMPLO_1<br>
[code]<br>
<br>
my @re; &nbsp; &nbsp;# lista de RegExp 60 itens<br>
my @paths; # lista de Paths 750.000 itens<br>
<br>
foreach my $path (@paths)<br>
{<br>
 &nbsp; map<br>
 &nbsp; {<br>
 &nbsp; &nbsp; &nbsp;if ($path =~ /^$_$/)<br>
 &nbsp; &nbsp; &nbsp;{<br>
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;next;<br>
 &nbsp; &nbsp; &nbsp;}<br>
 &nbsp; } @re<br>
}<br>
<br>
[/code]<br>
<br>
<br>
<br>
<br>
<br>
EXEMPLO_2<br>
[code]<br>
my @paths; # lista de Paths 750.000 itens<br>
<br>
foreach my $path (@paths)<br>
{<br>
 &nbsp; next if ($path =~ /^regex_1$/);<br>
 &nbsp; next if ($path =~ /^regex_2$/);<br>
 &nbsp; next if ($path =~ /^regex_3$/);<br>
 &nbsp; next if ($path =~ /^regex_4$/);<br>
 &nbsp; .<br>
 &nbsp; .<br>
 &nbsp; .<br>
 &nbsp; next if ($path =~ /^regex_60$/);<br>
}<br>
<br>
[/code]<br>
<br>
<br>
<br>
<br>
-- <br><font color="#888888">
Lucas Mateus<br>
Núcleo de Páginas Rápidas e SEO<br>
Fone: 55 11 3065-9978<br>
MSN: <a href="mailto:lucasmateus_777@hotmail.com" target="_blank">lucasmateus_777@hotmail.com</a><br>
_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">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>
</font></blockquote></div><br><br clear="all"><br>-- <br>Just another Perl Hacker,<br>Fernando (SmokeMachine)<br><a href="http://perl-e.org">http://perl-e.org</a><br>