quem deixou de ler que o email que postei começou assim? "jeito ‘dirty’ que funciona...."

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.

cada um usa como quiser, nem sempre é preciso um tratado com banca examinadora escrutinadora.

patrulheiros, menos.

-----Mensagem Original----- From: Blabos de Blebe
Sent: Tuesday, May 29, 2012 3:15 PM
To: Perl Mongers Rio de Janeiro
Subject: Re: [Rio-pm] Unzip

Você usa Perl como se tivesse usando papel higiênico, e eu preciso
amadurecer

Ué cara, cada um tem o direito de passar o que quiser na própria bunda.
A gente tá aqui é pra dizer que não é pra enfiar na nossa cara depois.

2012/5/29 Daniel Mantovani <[email protected]>:
Você usa Perl como se tivesse usando papel higiênico, e eu preciso
amadurecer. Da para perceber o quão maduro você é.
Para de se achar, e aprende alguma coisa.

[]'s
--
Software Engineer
Just Another Perl Hacker
Daniel Mantovani +5511 8538-9897
XOXO

On May 29, 2012, at 11:47 AM, <[email protected]> wrote:

Mantovani, menos.

Amadureça.

From: Daniel Mantovani
Sent: Tuesday, May 29, 2012 11:04 AM
To: [email protected] ; Perl Mongers Rio de Janeiro
Subject: Re: [Rio-pm] Unzip

Ulisses,

Se for para fazer porcaria, use Shell Script.

--
Software Engineer
Just Another Perl Hacker
Daniel Mantovani +5511 8538-9897
XOXO

On May 29, 2012, at 10:14 AM, <[email protected]> wrote:

jeito ‘dirty’ que funciona em Linux e MS$ |(se vc baixar o unzip for windows
na máquina).

se vc puder dar um exec no comando unzip, sugiro

$cmd = "unzip -o \"$in\" -d $path_temp_zip"; # unzipa $in no subdir
temporario, adicao de -o para overwrite sem perguntar nada para usuario

vc pode colocar opções para extrair apenas os arquivos que vc deseja
extrair: opções –x -C

$cmd_msg = qx/$cmd 2>&1/; # captura STDOUT e STDERR
$cmd_status = $?; # memoriza status de retorno do unzip

if ($cmd_status) {
    ($ok, $sev, $msg) = (0,1,"Erro ao executar '$cmd': $cmd_status:
$cmd_msg");
            ....
} else {
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
}

From: Aureliano Guedes
Sent: Tuesday, May 29, 2012 8:19 AM
To: Rio PM
Subject: Re: [Rio-pm] Unzip

O que tentei fazer foi isso:

http://pastebin.com/45tHKZur

Mas ainda não deu certo.


________________________________
Date: Mon, 28 May 2012 23:08:44 -0300
From: [email protected]
To: [email protected]
Subject: Re: [Rio-pm] Unzip

Walking through a zipfile, com certeza te providencia o nomes dos arquivos.
Afinal,.a extensão não importante, faz parte do nome...
0le
Send via Android
Em 28/05/2012 22:48, "Aureliano Guedes" <[email protected]> escreveu:

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).
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.

Então, como fazer?



From: [email protected]
Date: Mon, 28 May 2012 22:33:55 -0300
To: [email protected]
Subject: Re: [Rio-pm] Unzip


On May 28, 2012, at 10:18 PM, Aureliano Guedes wrote:

>
> Qual seria minh alternativa??

Ao invés do IO::Uncompress::Unzip? Hmmm.. que tal o IO::Uncompress::Unzip?

https://metacpan.org/module/IO::Uncompress::Unzip#Walking-through-a-zip-file

:D




_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm

_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm


_______________________________________________ Rio-pm mailing list
[email protected] http://mail.pm.org/mailman/listinfo/rio-pm

________________________________
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm





_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm

Responder a