[SP-pm] convertendo zip para base64

Andre Carneiro andregarciacarneiro at gmail.com
Sun Sep 5 09:05:39 PDT 2010


Porque vc precisa converter para Base64???



2010/9/5 eliane franco <elidmfranco at gmail.com>

> ola pessoal,
>
>
> Estou fazendo um programa que coleta um arquivo.zip e envia via smtp como
> anexo.
> Ao tentar abrir o anexo que chegou por email, ocorre o seguinte erro:
>
> End-of-central-directory signature not found. Either this file is not a Zip
> file, or it constitutes one disk of a multi-part Zip
>
> Sobre o código:
>
> use MIME::Base64;
> use Socket;
>
> Para abrir o arquivo:
>
>   open $a, "<$fname" or exec close_error (" $fname" );
>         binmode $a;
>
> Para ler os dados, estou usando readline e encaminhando para o encode
> $ans='';
>          while (<$a>) {
>          $ans=$ans.(encode_base64($_));
>                 }
>         close($a)       or die "close: $!" ;
>         return $ans;
>
> E o conteúdo dessa variável é encaminhada via socket.
> Eu acho que meu erro está na conversão para Base64, pois já fiz teste com
> um arquivo já convertido e o zip abriu corretamente.
>
> Alguém já obteve o erro acima?
>
> Obrigada pela ajuda.
> []'s
> Eliane
>
>
>
>
>
>
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm at pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>



-- 
André Garcia Carneiro
Analista/Desenvolvedor Perl
(11)82907780
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20100905/ad8e95eb/attachment.html>


More information about the SaoPaulo-pm mailing list