Aprendi aqui no grupo: Gentileza gera gentileza. Se isso ainda não resolver esse problema, marquem um chopp e resolvam suas diferenças pessoalmente, por favor.<br><br>Gabriel Andrade++ na resposta ao Aureliano.<br><br>Aureliano, é bom adotar uma filosofia: copiar e colar código pronto é sempre horrível e gera mais problemas do que já temos. Criar código acaba tornando as soluções mais fáceis por gerar menos erros e termos maior noção do que fizemos.<br>
<br>[]s<br><br><div class="gmail_quote">Em 29 de maio de 2012 12:09, <span dir="ltr"><<a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div style="WORD-WRAP:break-word" dir="ltr">
<div dir="ltr">
<div style="font-size:12pt;font-family:'Calibri'">
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:'Calibri';display:inline;font-weight:normal">
<div style="FONT:10pt tahoma">
<div><font face="Calibri" size="3"></font> </div>
<div><font face="Calibri" size="3">sem comentários, não vale a pena.</font></div>
<div><font face="Calibri" size="3"></font> </div>
<div><font face="Calibri" size="3">mas mantenho o meu ‘Amadureça’.</font></div>
<div> </div>
<div style="BACKGROUND:#f5f5f5">
<div><b>From:</b> <a title="daniel.oliveira.mantovani@gmail.com" href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">Daniel Mantovani</a> </div>
<div><b>Sent:</b> Tuesday, May 29, 2012 11:53 AM</div>
<div><b>To:</b> <a title="ulisses@ibiz.com.br" href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a> </div>
<div><b>Cc:</b> <a title="rio-pm@pm.org" href="mailto:rio-pm@pm.org" target="_blank">Perl Mongers
Rio de Janeiro</a> </div>
<div><b>Subject:</b> Re: [Rio-pm] Unzip</div></div></div>
<div> </div></div><div><div class="h5">
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:'Calibri';display:inline;font-weight:normal">
<div><span style="border-collapse:separate;text-indent:0px;letter-spacing:normal;font:medium helvetica;text-transform:none;white-space:normal;word-spacing:0px"><span style="border-collapse:separate;text-indent:0px;letter-spacing:normal;font:medium helvetica;text-transform:none;white-space:normal;word-spacing:0px">
<div style="WORD-WRAP:break-word"><span style="border-collapse:separate;text-indent:0px;letter-spacing:normal;font:medium helvetica;text-transform:none;white-space:normal;word-spacing:0px">
<div style="WORD-WRAP:break-word">Você
usa Perl como se tivesse usando papel higiênico, e eu preciso amadurecer. Da
para perceber o quão maduro você é.</div>
<div style="WORD-WRAP:break-word">Para
de se achar, e aprende alguma coisa.</div>
<div style="WORD-WRAP:break-word"> </div>
<div style="WORD-WRAP:break-word">[]'s</div>
<div style="WORD-WRAP:break-word">--
<br>Software Engineer<br>Just Another Perl Hacker<br>Daniel Mantovani +5511
8538-9897<br>XOXO</div></span></div></span></span></div>
<div> </div>
<div>
<div>On May 29, 2012, at 11:47 AM, <<a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a>> wrote:</div><br>
<blockquote type="cite">
<div style="WORD-WRAP:break-word" dir="ltr">
<div dir="ltr">
<div style="font-size:12pt;font-family:'Calibri'">
<div>Mantovani, menos.</div>
<div> </div>
<div>Amadureça.</div>
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:'Calibri';display:inline;font-weight:normal">
<div style="FONT:10pt tahoma">
<div><font face="Calibri" size="3"></font> </div>
<div style="BACKGROUND:#f5f5f5">
<div><b>From:</b> <a title="daniel.oliveira.mantovani@gmail.com" href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">Daniel Mantovani</a> </div>
<div><b>Sent:</b> Tuesday, May 29, 2012 11:04 AM</div>
<div><b>To:</b> <a title="ulisses@ibiz.com.br" href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a> ; <a title="rio-pm@pm.org" href="mailto:rio-pm@pm.org" target="_blank">Perl Mongers Rio de
Janeiro</a> </div>
<div><b>Subject:</b> Re: [Rio-pm] Unzip</div></div></div>
<div> </div></div>
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:'Calibri';display:inline;font-weight:normal">
<div>Ulisses,</div>
<div> </div>
<div>Se for para fazer porcaria, use Shell Script.</div>
<div>
<div> </div>
<div><span style="TEXT-TRANSFORM:none;TEXT-INDENT:0px;LETTER-SPACING:normal;BORDER-COLLAPSE:separate;FONT:medium helvetica;WHITE-SPACE:normal;WORD-SPACING:0px"><span style="TEXT-TRANSFORM:none;TEXT-INDENT:0px;LETTER-SPACING:normal;BORDER-COLLAPSE:separate;FONT:medium helvetica;WHITE-SPACE:normal;WORD-SPACING:0px">
<div style="WORD-WRAP:break-word"><span style="TEXT-TRANSFORM:none;TEXT-INDENT:0px;LETTER-SPACING:normal;BORDER-COLLAPSE:separate;FONT:medium helvetica;WHITE-SPACE:normal;WORD-SPACING:0px">
<div style="WORD-WRAP:break-word">--
<br>Software Engineer<br>Just Another Perl Hacker<br>Daniel Mantovani +5511
8538-9897<br>XOXO</div></span></div></span></span></div>
<div> </div>
<div>
<div>On May 29, 2012, at 10:14 AM, <<a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a>> wrote:</div><br>
<blockquote type="cite"><span style="TEXT-TRANSFORM:none;TEXT-INDENT:0px;LETTER-SPACING:normal;BORDER-COLLAPSE:separate;FONT:medium helvetica;WHITE-SPACE:normal;WORD-SPACING:0px">
<div style="FONT-FAMILY:tahoma;FONT-SIZE:10pt" dir="ltr">
<div dir="ltr">
<div style="font-size:12pt;font-family:calibri">
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:calibri;display:inline;font-weight:normal">
<div style="FONT:10pt tahoma">
<div><font face="Calibri" size="3">jeito ‘dirty’ que funciona em Linux e MS$
|(se vc baixar o unzip for windows na máquina).</font></div>
<div><font face="Calibri" size="3"></font> </div>
<div><font face="Calibri" size="3">se vc puder dar um exec no comando unzip,
sugiro</font></div>
<div><font face="Calibri" size="3"></font> </div>
<div>$cmd = "unzip -o \"$in\" -d $path_temp_zip"; # unzipa $in no subdir
temporario, adicao de -o para overwrite sem perguntar nada para
usuario</div>
<div> </div>
<div><font face="Calibri" size="3">vc pode colocar opções para extrair apenas os
arquivos que vc deseja extrair: opções –x -C</font></div>
<div><font face="Calibri" size="3"></font> </div>
<div>$cmd_msg = qx/$cmd 2>&1/; # captura STDOUT e STDERR</div>
<div>$cmd_status = $?; # memoriza status de retorno do unzip</div>
<div> </div>
<div>if ($cmd_status) {</div>
<div> ($ok, $sev, $msg) = (0,1,"Erro ao executar '$cmd':
$cmd_status: $cmd_msg");</div>
<div>
....</div>
<div>} else {</div>
<div> navegue por $path_temp_zip para tratar os
arquivos do seu interesse, ja filtrados pelas opções que vc deve adicionar
no $cmd unzip acima </div>
<div>}</div>
<div><font face="Calibri" size="3"></font> </div>
<div style="BACKGROUND-COLOR:rgb(245,245,245)">
<div><b>From:</b><span> </span><a title="guedes_1000@hotmail.com" href="mailto:guedes_1000@hotmail.com" target="_blank">Aureliano Guedes</a></div>
<div><b>Sent:</b><span> </span>Tuesday, May
29, 2012 8:19 AM</div>
<div><b>To:</b><span> </span><a title="rio-pm@pm.org" href="mailto:rio-pm@pm.org" target="_blank">Rio PM</a></div>
<div><b>Subject:</b><span> </span>Re:
[Rio-pm] Unzip</div></div></div>
<div> </div></div>
<div style="font-size:small;font-style:normal;text-decoration:none;font-family:calibri;display:inline;font-weight:normal">
<div dir="ltr">O que tentei fazer foi isso:<br><br><a href="http://pastebin.com/45tHKZur" target="_blank">http://pastebin.com/45tHKZur</a><br><br>Mas
ainda não deu certo.<br><br><br>
<div>
<div></div>
<hr>
Date: Mon, 28 May 2012 23:08:44 -0300<br>From: <a href="mailto:ole.ufg@gmail.com" target="_blank">ole.ufg@gmail.com</a><br>To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>Subject: Re: [Rio-pm]
Unzip<br><br>Walking through a zipfile, com certeza te providencia o nomes
dos arquivos. Afinal,.a extensão não importante, faz parte do
nome...<br>0le<br>Send via Android<br>
<div>Em 28/05/2012 22:48, "Aureliano Guedes" <<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>>
escreveu:<br>
<blockquote style="BORDER-LEFT:rgb(204,204,204) 1px solid;PADDING-LEFT:1ex">
<div>
<div dir="ltr">Ok. Entendo ja li a documentação, inclusive ja pesquisei
codigo pronto ja internet. Mas ainda sim não consegui usa-lo, pois
especificando a extenção do arquivo fica facil, o output saira com a
extenção desejada, mesmo que você coloque *.cmj (casa da mãe
joana).<br>Minha duvida é, descompactar 800 arquivos *.zip onde o conteudo
pode ser arquivos das mais diversas extenções, as vezes mais de um
arquivo, as vezes uma pasta contendo outros arquivos, acontece que sempre
sai um arquivo vazio como ja falei.<br><br>Então, como
fazer?<br><br><br><br>
<div>
<div></div>> From:<span> </span><a href="mailto:gabiruh@gmail.com" target="_blank">gabiruh@gmail.com</a><br>> Date: Mon,
28 May 2012 22:33:55 -0300<br>> To:<span> </span><a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>> Subject: Re:
[Rio-pm] Unzip<br>><span> </span><br>><span> </span><br>> On May 28, 2012, at
10:18 PM, Aureliano Guedes wrote:<br>><span> </span><br>> ><span> </span><br>> > Qual seria minh
alternativa??<br>><span> </span><br>> Ao invés do
IO::Uncompress::Unzip? Hmmm.. que tal o
IO::Uncompress::Unzip?<br>><span> </span><br>><span> </span><a href="https://metacpan.org/module/IO::Uncompress::Unzip#Walking-through-a-zip-file" target="_blank">https://metacpan.org/module/IO::Uncompress::Unzip#Walking-through-a-zip-file</a><br>
><span> </span><br>> :D<br>><span> </span><br>><span> </span><br>><span> </span><br>><span> </span><br>>
_______________________________________________<br>> Rio-pm mailing
list<br>><span> </span><a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>><span> </span><a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
</div></div></div><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></blockquote>
</div><br>_______________________________________________
Rio-pm mailing list <a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a> <a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a></div></div>
<p style="PADDING-BOTTOM:0px;MARGIN:0px;PADDING-LEFT:0px;PADDING-RIGHT:0px;PADDING-TOP:0px"></p>
<hr>
_______________________________________________<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></div>
</div></div>_______________________________________________<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></div></span></blockquote>
</div>
<div> </div></div></div></div></div></div></blockquote></div>
<div> </div></div></div></div></div></div></div>
<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></blockquote></div><br>