<P>Luis,</P>
<P>Isto pode ajudar ?</P>
<P><A href="http://perlmonks.thepen.com/150255.html">http://perlmonks.thepen.com/150255.html</A></P>
<DIV>
<DIV>&nbsp;</DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>De:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>cascavel-pm-bounces@mail.pm.org</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Para:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>"Cascavel Perl Monks" cascavel-pm@mail.pm.org,"Sao Paulo Perl Mongers Mail List" SaoPaulo-pm@pm.org,"Grupo de Usuários Perl" perl-br@yahoogroups.com</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Cópia:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2></FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Data:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>Wed, 4 Aug 2004 15:37:46 -0300 (BRT)</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD class=txt width=100 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2><B>Assunto:</B></FONT></TD>
<TD class=txt width=400 bgColor=#d8d8d8><FONT face="Trebuchet MS; verdana; arial" size=2>[Cascavel-pm] [DBD::mysql &amp; DBI]: Como manipular arquivos de até 4Gb em BLOBs?</FONT></TD></TR></TBODY></TABLE></DIV>
<DIV>
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR>
<TD width=100 bgColor=#e8e8e8>&nbsp;</TD>
<TD width=400 bgColor=#e8e8e8>&nbsp;</TD></TR></TBODY></TABLE></DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Colegas,</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Eu tenho uma tabela no meu banco de dados para coletar arquivos de</DIV>
<DIV>&gt; tamanho arbitrário, provenientes de uma interface de download/upload</DIV>
<DIV>&gt; baseada em web que estou construindo.</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Minha tabela, em SQL, simplificada para este problema:</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; CREATE TABLE File(</DIV>
<DIV>&gt; id INT(16) PRIMARY KEY,</DIV>
<DIV>&gt; owner VARCHAR(40) NOT NULL,</DIV>
<DIV>&gt; mime_type VARCHAR(120) NOT NULL,</DIV>
<DIV>&gt; payload LARGEBLOB NULL</DIV>
<DIV>&gt; );</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Estou usando (em camadas, de baixo para cima, nesta ordem):</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; MySQL | DBD::mysql | DBI | Ima::DBI | Class::DBI | Class::DBI::Loader</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Não tenho preconceitos quanto a usar outras classes ou interromper este</DIV>
<DIV>&gt; fluxo de dados em qualquer pedaço acima do DBD::mysql e abaixo do</DIV>
<DIV>&gt; Class::DBI::Loader. :-)</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Não tenho pretensão de ter memória suficiente para carregar</DIV>
<DIV>&gt; completamente qualquer arquivo (de até 4Gb) para a memória, de forma a</DIV>
<DIV>&gt; poder inserí-lo usando um "UPDATE File SET payload = ?" ou "INSERT...".</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Gostaria de saber se alguém conhece alguma forma de obter um IO::Handle</DIV>
<DIV>&gt; ou algum "treco" similar onde eu pudesse executar write()'s POSIX ou coisa</DIV>
<DIV>&gt; parecida, e gravar os dados para o BLOB em pedaços menores (512 Bytes?).</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; Obrigado por qualquer ajuda que vocês puderem me oferecer.</DIV>
<DIV>&gt; Até breve.</DIV>
<DIV>&gt; -- </DIV>
<DIV>&gt; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=</DIV>
<DIV>&gt; Luis Campos de Carvalho is BSc in Comp Science,</DIV>
<DIV>&gt; PerlMonk [SiteDocClan], Cascavel-pm Moderator,</DIV>
<DIV>&gt; Unix Sys Admin &amp;&amp; Certified Oracle DBA</DIV>
<DIV>&gt; http://br.geocities.com/monsieur_champs/</DIV>
<DIV>&gt; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=</DIV>
<DIV>&gt; </DIV>
<DIV>&gt; </DIV>
<DIV>&gt; _______________________________________________</DIV>
<DIV>&gt; Cascavel-pm mailing list</DIV>
<DIV>&gt; Cascavel-pm@mail.pm.org</DIV>
<DIV>&gt; http://cascavel.pm.org/mailman/listinfo/cascavel-pm</DIV></DIV>