Falando em programação funcional e extrapolando o tópico, alguém tem uma boa referência focada em Perl?<div>Mal consigo compreender reduce() do List::Util :(<br clear="all"><br>ABS()<br><br>
<br><br><div class="gmail_quote">2011/5/29 Tiago Peczenyj <span dir="ltr"><<a href="mailto:tiago.peczenyj@gmail.com">tiago.peczenyj@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

A melhor analogia a subrotina grep do perl é o comando grep no unix.<br>
<br>
$ grep 'condição' arquivo<br>
<br>
e o grep imprime na stdout as linhas do arquivo que satisfazem a condição.<br>
<br>
Agora o map é engraçado pois ele não tem equivalente no mundo shell,<br>
mas sim no mundo de programação funcional, acredito que ja foi muito<br>
explorado aqui.<br>
<br>
2011/5/29 Satoshi Hayazaki <<a href="mailto:heavennevertouchedearthlyface@gmail.com">heavennevertouchedearthlyface@gmail.com</a>>:<br>
<div><div></div><div class="h5">><br>
><br>
> 2011/5/29 Renato Santos <<a href="mailto:renato.cron@gmail.com">renato.cron@gmail.com</a>><br>
>><br>
>> O map gera uma nova lista com o resultado que você retornou (percorrendo<br>
>> cada item da[s] lista[s] que você passou)<br>
>> e o grep retorna o conteudo original dependendo do resultando que você<br>
>> retornou no código para cada um dos item[s].<br>
>> Look this:<br>
>> @quatroZeros = map { 0 } qw / a b c d/;<br>
>> @vazio = grep { 0 } qw / a b c d/;<br>
>> ----------------------<br>
>> @quatroUm = map { 1 } qw / a b c d/;<br>
>> @abc_e_d = grep { 1 } qw / a b c d/;<br>
>><br>
><br>
><br>
> Adorei esse exemplo. Eu que não conhecia nenhum dos dois muito bem (só de<br>
> ouvir falar, mas nunca tinha usado) consegui entender perfeitamente com<br>
> isso. RenatoCRON++<br>
</div></div><div class="im">> =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>
><br>
<br>
<br>
<br>
</div><font color="#888888">--<br>
Tiago B. Peczenyj<br>
Linux User #405772<br>
<br>
<a href="http://pacman.blog.br" target="_blank">http://pacman.blog.br</a><br>
</font><div><div></div><div class="h5">=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>
</div></div></blockquote></div><br></div>