<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
  <meta content="text/html; charset=ISO-8859-1"
 http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
Opa!...e aí Thiago?<br>
<br>
Então, pela sua explicação e juntando com o que li até agora, quando
você diz que o grep está associado à uma condição, o map também não
estaria? É isso que me confunde!<br>
<br>
Seguindo seu exemplo:<br>
<pre wrap="">map { BLOCO } LISTA;
grep { BLOCO } LISTA;
</pre>
"BLOCO" não poderia ser uma "condição" em ambos os casos?<br>
<br>
Posso entender que <b>grep</b> trabalha me retornando os itens de uma
lista INDIVIDUALMENTE, conforme atenderem a uma determinada condição?<br>
E que com o <b>map</b> eu manipulo as listas ?<br>
<br>
<br>
On 29-05-2011 17:24, Thiago Rondon wrote:
<blockquote
 cite="mid:20110529202442.GA23881@thiago-rondons-macbook-2.local"
 type="cite">
  <pre wrap="">On Sun, May 29, 2011 at 04:53:51PM -0300, "Flávio R. Lopes" wrote:
  </pre>
  <blockquote type="cite">
    <pre wrap="">Boa tarde pessoal.
Ainda não ficou claro para mim as diferenças entre map e grep.
Andei lendo uma coisas por aí (inclusive em Perldoc), mas mesmo
assim não consegui pegar os conceitos de forma clara.

Alguém poderia me dar alguns exemplos (ou alguma documentação ou
link) de quando usar um e outro?

    </pre>
  </blockquote>
  <pre wrap="">
Olá Flávio,

Você pode pensar nos dois como um loop "foreach". No qual estas duas funções tem a habilidade de tornar o código mais compactado, o uso dos dois são:

map { BLOCO } LISTA;
grep { BLOCO } LISTA;

"map" aplica um bloco (função) em todos os elementos da lista, e retorna o resultado. "grep" retorna todos os elementos da lista que o bloco executado (função) retorna verdadeiro.

Ou seja, o "grep" poderia ser: 
@foo; foreach(@lista) { push (@foo,$_) if CONDIÇÃO };

Que é o mesmo que: 
@foo = map { if (CONDIÇÃO) { $_ } } @lista;

Que pode ser simplificado por: 
@foo = grep CONDIÇÃO, @lista;

Ou seja, o uso do grep esta associado a uma condição. Vamos ilustrar com um exemplo prático, vamos supor que você tenha uma array com valores dos arquivos de um diretório.

opendir(DIR, '/tmp');
@arquivos = readdir(DIR);

@diretorios = grep(-d, @arquivos);

Neste exemplo, você vai ler todos os elementos da array @arquivos, porém irá ter na array @diretorios somente o que passar pela condicional (-d). Ou seja, os diretórios de DIR.

Agora, por exemplo, você quer retornar todos os tamanho dos @arquivos. Veja, executar uma função e retornar o resultado:

@tamanhos = map(-s, @arquivos);

Espero que tenha ajudado.

-Thiago Rondon

=begin disclaimer
   Sao Paulo Perl Mongers: <a class="moz-txt-link-freetext" href="http://sao-paulo.pm.org/">http://sao-paulo.pm.org/</a>
 SaoPaulo-pm mailing list: <a class="moz-txt-link-abbreviated" href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a>
 L<a class="moz-txt-link-rfc2396E" href="http://mail.pm.org/mailman/listinfo/saopaulo-pm"><http://mail.pm.org/mailman/listinfo/saopaulo-pm></a>
=end disclaimer

  </pre>
</blockquote>
<br>
</body>
</html>