26o.<br><br><div class="gmail_quote">Em 29 de maio de 2012 15:24,  <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">
quem deixou de ler que o email que postei começou assim? "jeito ‘dirty’ que funciona...."<br>
<br>
não foi dito que é a melhor maneira; é uma que funciona para quem estava tendo dificuldades com outro módulo; a sugestão não usa módulos e é rápida.<br>
<br>
cada um usa como quiser, nem sempre é preciso um tratado com banca examinadora escrutinadora.<br>
<br>
patrulheiros, menos.<div class="im"><br>
<br>
-----Mensagem Original----- From: Blabos de Blebe<br></div>
Sent: Tuesday, May 29, 2012 3:15 PM<br>
To: Perl Mongers Rio de Janeiro<div class="HOEnZb"><div class="h5"><br>
Subject: Re: [Rio-pm] Unzip<br>
<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Você usa Perl como se tivesse usando papel higiênico, e eu preciso<br>
amadurecer<br>
</blockquote>
<br>
Ué cara, cada um tem o direito de passar o que quiser na própria bunda.<br>
A gente tá aqui é pra dizer que não é pra enfiar na nossa cara depois.<br>
<br>
2012/5/29 Daniel Mantovani <<a href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">daniel.oliveira.mantovani@<u></u>gmail.com</a>>:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Você usa Perl como se tivesse usando papel higiênico, e eu preciso<br>
amadurecer. Da para perceber o quão maduro você é.<br>
Para de se achar, e aprende alguma coisa.<br>
<br>
[]'s<br>
--<br>
Software Engineer<br>
Just Another Perl Hacker<br>
Daniel Mantovani <a href="tel:%2B5511%208538-9897" value="+551185389897" target="_blank">+5511 8538-9897</a><br>
XOXO<br>
<br>
On May 29, 2012, at 11:47 AM, <<a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a>> wrote:<br>
<br>
Mantovani, menos.<br>
<br>
Amadureça.<br>
<br>
From: Daniel Mantovani<br>
Sent: Tuesday, May 29, 2012 11:04 AM<br>
To: <a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a> ; Perl Mongers Rio de Janeiro<br>
Subject: Re: [Rio-pm] Unzip<br>
<br>
Ulisses,<br>
<br>
Se for para fazer porcaria, use Shell Script.<br>
<br>
--<br>
Software Engineer<br>
Just Another Perl Hacker<br>
Daniel Mantovani <a href="tel:%2B5511%208538-9897" value="+551185389897" target="_blank">+5511 8538-9897</a><br>
XOXO<br>
<br>
On May 29, 2012, at 10:14 AM, <<a href="mailto:ulisses@ibiz.com.br" target="_blank">ulisses@ibiz.com.br</a>> wrote:<br>
<br>
jeito ‘dirty’ que funciona em Linux e MS$ |(se vc baixar o unzip for windows<br>
na máquina).<br>
<br>
se vc puder dar um exec no comando unzip, sugiro<br>
<br>
$cmd = "unzip -o \"$in\" -d $path_temp_zip"; # unzipa $in no subdir<br>
temporario, adicao de -o para overwrite sem perguntar nada para usuario<br>
<br>
vc pode colocar opções para extrair apenas os arquivos que vc deseja<br>
extrair: opções –x -C<br>
<br>
$cmd_msg = qx/$cmd 2>&1/; # captura STDOUT e STDERR<br>
$cmd_status = $?; # memoriza status de retorno do unzip<br>
<br>
if ($cmd_status) {<br>
    ($ok, $sev, $msg) = (0,1,"Erro ao executar '$cmd': $cmd_status:<br>
$cmd_msg");<br>
            ....<br>
} else {<br>
   navegue por   $path_temp_zip para tratar os arquivos do seu interesse, ja<br>
filtrados pelas opções que vc deve adicionar no $cmd unzip acima<br>
}<br>
<br>
From: Aureliano Guedes<br>
Sent: Tuesday, May 29, 2012 8:19 AM<br>
To: Rio PM<br>
Subject: Re: [Rio-pm] Unzip<br>
<br>
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>
______________________________<u></u>__<br>
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.<br>
Afinal,.a extensão não importante, faz parte do nome...<br>
0le<br>
Send via Android<br>
Em 28/05/2012 22:48, "Aureliano Guedes" <<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>> escreveu:<br>
<br>
Ok. Entendo ja li a documentação, inclusive ja pesquisei codigo pronto ja<br>
internet. Mas ainda sim não consegui usa-lo, pois especificando a extenção<br>
do arquivo fica facil, o output saira com a extenção desejada, mesmo que<br>
você coloque *.cmj (casa da mãe joana).<br>
Minha duvida é, descompactar 800 arquivos *.zip onde o conteudo pode ser<br>
arquivos das mais diversas extenções, as vezes mais de um arquivo, as vezes<br>
uma pasta contendo outros arquivos, acontece que sempre sai um arquivo vazio<br>
como ja falei.<br>
<br>
Então, como fazer?<br>
<br>
<br>
<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
From: <a href="mailto:gabiruh@gmail.com" target="_blank">gabiruh@gmail.com</a><br>
Date: Mon, 28 May 2012 22:33:55 -0300<br>
To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>
Subject: Re: [Rio-pm] Unzip<br>
<br>
<br>
On May 28, 2012, at 10:18 PM, Aureliano Guedes wrote:<br>
<br>
><br>
> Qual seria minh alternativa??<br>
<br>
Ao invés do IO::Uncompress::Unzip? Hmmm.. que tal o IO::Uncompress::Unzip?<br>
<br>
<a href="https://metacpan.org/module/IO::Uncompress::Unzip#Walking-through-a-zip-file" target="_blank">https://metacpan.org/module/<u></u>IO::Uncompress::Unzip#Walking-<u></u>through-a-zip-file</a><br>
<br>
:D<br>
<br>
<br>
<br>
<br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a><br>
</blockquote>
<br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a><br>
<br>
<br>
______________________________<u></u>_________________ Rio-pm mailing list<br>
<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/<u></u>listinfo/rio-pm</a><br>
<br>
______________________________<u></u>__<br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a><br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a><br>
<br>
<br>
<br>
<br>
<br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a><br>
</blockquote>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a> <br>
______________________________<u></u>_________________<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/<u></u>listinfo/rio-pm</a></div></div></blockquote></div><br>