[Cascavel-pm] Deletando o que já foi expirado...

[Eden Cardim]

On 7/9/07, João Gabriel <jamorreu em gmail.com> wrote:
> Tem sim. Após criar a imagem, use:
> <code>
> print "Content-type: image/gif\n\n";
> binmode STDOUT;                              # Converte a saída para binario
> $imagem=$novo->Write( "gif:-" );  # Mostra a imagem em formato GIF
> </code>

É um pouco mais do que isso:

- primeiro, binmode não "converte" a saída pra binário, ele apenas
indica pro Perl que os escalares devem ser tratados como binário a
partir desse ponto
- segundo, você teria que setar o "Content-length", e usar o pragma
bytes pra calcular o tamanho da imagem.

Esse é o mal de fazer tudo na mão com CGI, o Catalyst faz isso tudo
por você, de graça...

-- 
Eden Cardim
Instituto Baiano de Biotecnologia
Núcleo de Biologia Computacional e Gestão de Informações Biotecnológicas
Laboratório de Bioinformática