[Cascavel-pm] Digest Cascavel-pm, volume 361, assunto 6
Roan Brasil Monteiro
roanbrasil em gmail.com
Segunda Agosto 30 15:15:35 PDT 2010
Elaine,
Obrigado, no caso do que o André sugeriu me ajudou, mas vou tentar ver se
esse teu jeito funciona também pois é mais uma forma de aprender.
Obrigado.
2010/8/27 eliane franco <elidmfranco em gmail.com>
> Olá Roan,
>
> Desculpe se de alguma forma eu veja coisas simples, estou tentando te
> ajudar a achar o raciocínio para o que deseja.
> Vamos lá!
>
> Vc já checou se o conteúdo dessa array tem exatamente o que vc espera?
> (print array por exemplo)
>
> Vc não pode usar serviço FTP? Net::FTP::Robust - download files over FTP
>
> Quanto a função, veja :
> oDownloadAdd($url, $dirDownload, $file, [$urlReferer = ""])<http://search.cpan.org/%7Ejohanl/Net-Download-Queue-0.04/lib/Net/Download/Queue.pm#___top>
>
> Add $url to the queue, to be downloaded in $dirDownload/$file.
>
> >>>>>#The url is now queued <<<<<
>
> # on another command line (you can have many of these)
>
> download_queue --process
>
> #Urls are downloades as they appear in the queue.
>
>
> abraços,
>
> Eliane
>
>
>
>
> Em 26 de agosto de 2010 18:34, <cascavel-pm-request em pm.org> escreveu:
>
>> Enviar submissões para a lista de discussão Cascavel-pm para
>> cascavel-pm em pm.org
>>
>> Para se cadastrar ou descadastrar via WWW, visite o endereço
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> ou, via email, envie uma mensagem com a palavra 'help' no assunto ou
>> corpo da mensagem para
>> cascavel-pm-request em pm.org
>>
>> Você poderá entrar em contato com a pessoa que gerencia a lista pelo
>> endereço
>> cascavel-pm-owner em pm.org
>>
>> Quando responder, por favor edite sua linha Assunto assim ela será
>> mais específica que "Re: Contents of Cascavel-pm digest..."
>>
>>
>> Tópicos de Hoje:
>>
>> 1. Re: Download Zip File (eliane franco)
>> 2. Re: Download Zip File (Roan Brasil Monteiro)
>> 3. Re: Download Zip File (Andre Carneiro)
>> 4. Re: Download Zip File (Andre Carneiro)
>> 5. Re: Download Zip File (Roan Brasil Monteiro)
>>
>>
>> ----------------------------------------------------------------------
>>
>> Message: 1
>> Date: Thu, 26 Aug 2010 17:36:40 -0300
>> From: eliane franco <elidmfranco em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: cascavel-pm em pm.org
>> Message-ID:
>> <AANLkTinfFCgDWCY2sgZuhwsfFx2XpgXs04SugsH9B5sT em mail.gmail.com>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> olá Roan,
>>
>> Poderia mostrar o erro apresentado e qual lib está dando errado?
>>
>> []'s
>> Eliane
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/e30b5eba/attachment-0001.html
>> >
>>
>> ------------------------------
>>
>> Message: 2
>> Date: Thu, 26 Aug 2010 17:40:23 -0300
>> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>> <AANLkTikJjk2SMaw_TtbNBBSM0uPsYWXN55Q00KwzezsR em mail.gmail.com>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Oi Eliane,
>>
>> A priori não há erro algum... a minha dúvida é...
>>
>> Esqueçendo um pouco meu código, considerando que tenho um array
>> onde o conteudo é { "http://site.com.br/arquivo1.zip", "
>> http://site.com.te/arquivo2.zip" ,....,arquivoN.zip"}
>> Se uso esse método ele não salva no C:\\ o meyu arquiv, gostaria de saber
>> uma alternativa que funcionasse sem problemas, ele passa direto do código
>> e
>> não resolve.
>>
>> my $oQueue = Net::Download::Queue->new() or die;
>> my $oDownload = $oQueue->oDownloadAdd(
>> $complete_url,
>> "C:\\",
>> $variavel,
>> ) or die;
>> }
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/cd227129/attachment-0001.html
>> >
>>
>> ------------------------------
>>
>> Message: 3
>> Date: Thu, 26 Aug 2010 18:03:21 -0300
>> From: Andre Carneiro <andregarciacarneiro em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>> <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>>
>> Se a sua url é http e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> usar MIME::Base64, fora o lance do password...
>>
>>
>> A sua requisição deveria ser algo do tipo
>>
>>
>> $mech->credentials($user,$passwd);
>> eval{ $mech->get('http://url_do_arquivo.zip')};
>> if($mech->success){
>> #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> TROCO EH BINARIO, ENTAO:
>> open my $f,'>','/tmp/arquivosalvo.zip' or die $!; #PREGUICA DE FAZER
>> OUTRO EVAL... MAS NAO USE DIE!!!!
>> binmode $f; #SENAO VAI DAR ZEBRA...
>> print $f $mech->content;
>> close $f; #ACABOU...SO ISSO!
>> }
>> else{
>> print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> }
>>
>>
>>
>>
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0002.html
>> >
>>
>> ------------------------------
>>
>> Message: 4
>> Date: Thu, 26 Aug 2010 18:03:21 -0300
>> From: Andre Carneiro <andregarciacarneiro em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>> <AANLkTinMhrtJJe0k68s7JcCb+AXiiP5qEeqyniSb8yDH em mail.gmail.com<AANLkTinMhrtJJe0k68s7JcCb%2BAXiiP5qEeqyniSb8yDH em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Pra que vc tá usando MIME::Base64 junto com um decode_content...
>>
>> Se a sua url é http e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> usar MIME::Base64, fora o lance do password...
>>
>>
>> A sua requisição deveria ser algo do tipo
>>
>>
>> $mech->credentials($user,$passwd);
>> eval{ $mech->get('http://url_do_arquivo.zip')};
>> if($mech->success){
>> #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> TROCO EH BINARIO, ENTAO:
>> open my $f,'>','/tmp/arquivosalvo.zip' or die $!; #PREGUICA DE FAZER
>> OUTRO EVAL... MAS NAO USE DIE!!!!
>> binmode $f; #SENAO VAI DAR ZEBRA...
>> print $f $mech->content;
>> close $f; #ACABOU...SO ISSO!
>> }
>> else{
>> print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> }
>>
>>
>>
>>
>>
>> 2010/8/26 eliane franco <elidmfranco em gmail.com>
>>
>> >
>> > olá Roan,
>> >
>> > Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >
>> > []'s
>> > Eliane
>> >
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> André Garcia Carneiro
>> Analista/Desenvolvedor Perl
>> (11)82907780
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/d86b9a52/attachment-0003.html
>> >
>>
>> ------------------------------
>>
>> Message: 5
>> Date: Thu, 26 Aug 2010 18:34:03 -0300
>> From: Roan Brasil Monteiro <roanbrasil em gmail.com>
>> Subject: Re: [Cascavel-pm] Download Zip File
>> To: Cascavel Perl Mongers <cascavel-pm em pm.org>
>> Message-ID:
>> <AANLkTin_uWdFCnHFXpJ=K_ymZ6dKgY_CTiBUzcZGV9+R em mail.gmail.com<K_ymZ6dKgY_CTiBUzcZGV9%2BR em mail.gmail.com>
>> >
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> André estou testando... realmente não tem motivo usar o Base64. \o/
>>
>> 2010/8/26 Andre Carneiro <andregarciacarneiro em gmail.com>
>>
>> > Pra que vc tá usando MIME::Base64 junto com um decode_content...
>> >
>> > Se a sua url é http e não https(e mesmo que fosse), não vejo motivo pra
>> vc
>> > usar MIME::Base64, fora o lance do password...
>> >
>> >
>> > A sua requisição deveria ser algo do tipo
>> >
>> >
>> > $mech->credentials($user,$passwd);
>> > eval{ $mech->get('http://url_do_arquivo.zip')};
>> > if($mech->success){
>> > #BELEZA. TODO O CONTEUDO DO .zip ESTA EM $mech->content. SO QUE ESSE
>> > TROCO EH BINARIO, ENTAO:
>> > open my $f,'>','/tmp/arquivosalvo.zip' or die $!; #PREGUICA DE FAZER
>> > OUTRO EVAL... MAS NAO USE DIE!!!!
>> > binmode $f; #SENAO VAI DAR ZEBRA...
>> > print $f $mech->content;
>> > close $f; #ACABOU...SO ISSO!
>> > }
>> > else{
>> > print"\n\nTEM ALGO ERRADO COM A REQUISICAO $@";
>> > }
>> >
>> >
>> >
>> >
>> >
>> > 2010/8/26 eliane franco <elidmfranco em gmail.com>
>> >
>> >>
>> >> olá Roan,
>> >>
>> >> Poderia mostrar o erro apresentado e qual lib está dando errado?
>> >>
>> >> []'s
>> >> Eliane
>> >>
>> >>
>> >> _______________________________________________
>> >> Cascavel-pm mailing list
>> >> Cascavel-pm em pm.org
>> >> http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >>
>> >
>> >
>> >
>> > --
>> > André Garcia Carneiro
>> > Analista/Desenvolvedor Perl
>> > (11)82907780
>> >
>> > _______________________________________________
>> > Cascavel-pm mailing list
>> > Cascavel-pm em pm.org
>> > http://mail.pm.org/mailman/listinfo/cascavel-pm
>> >
>>
>>
>>
>> --
>> Atenciosamente,
>>
>> Roan Brasil Monteiro
>> http://roanbrasil.wordpress.com/
>> http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
>> -------------- Próxima Parte ----------
>> Um anexo em HTML foi limpo...
>> URL: <
>> http://mail.pm.org/pipermail/cascavel-pm/attachments/20100826/eae5f83a/attachment.html
>> >
>>
>> ------------------------------
>>
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
>> Fim da Digest Cascavel-pm, volume 361, assunto 6
>> ************************************************
>>
>
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
--
Atenciosamente,
Roan Brasil Monteiro
http://roanbrasil.wordpress.com/
http://www.gramaro.com.br/ - Grama em Tapete Salvador Bahia
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/cascavel-pm/attachments/20100830/01c88fbe/attachment-0001.html>
Mais detalhes sobre a lista de discussão Cascavel-pm