From marcosbastosz em yahoo.com.br Tue Nov 8 16:26:13 2005 From: marcosbastosz em yahoo.com.br (Marcos Bastos) Date: Wed, 9 Nov 2005 00:26:13 +0000 (GMT) Subject: [Vitoria-pm] Enviar um arquivo via http Message-ID: <20051109002613.99734.qmail@web35115.mail.mud.yahoo.com> Olá pessoal, meu problema é o seguinte. Como enviar um arquivo.zip via http::request para outro sevidor. No meu caso eu não estou recebendo um arquivo via http. Eu tenho é que enviar para outro servidor. EX: ... my $url = "CAMPO1=&campo2=1234&campo3=abc&...."; my $http = "http://192.1.1.1/cgi-bin/GERAR-CGI?$url"; my $req = new HTTP::Request 'POST' => "$http"; $res = $ua->request($req); print "Resultado: " . $res->content; A questão é se o arquivo tem que passar por um processo de transformação (transformar em uma linha binária, ...) antes de enviar para o http. Do modo que eu estou demonstrando, não vai funcionar, pois o http que vai receber não vai entender que é um arquivo binário (multipart/form-data). Então como tem que ser feito? --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/vitoria/attachments/20051109/906a684d/attachment.html From marcosbastosz em yahoo.com.br Tue Nov 8 16:31:54 2005 From: marcosbastosz em yahoo.com.br (Marcos Bastos) Date: Wed, 9 Nov 2005 00:31:54 +0000 (GMT) Subject: [Vitoria-pm] Enviar um arquivo via http Message-ID: <20051109003154.10887.qmail@web35105.mail.mud.yahoo.com> Olá pessoal, Meu mail teve problemas, se esta mensagem foi enviada duas vezes, me desculpe. meu problema é o seguinte. Como enviar um arquivo.zip via http::request para outro sevidor. No meu caso eu não estou recebendo um arquivo via http. Eu tenho é que enviar para outro servidor. EX: ... my $url = "CAMPO1=&campo2=1234&campo3=abc&...."; my $http = "http://192.1.1.1/cgi-bin/GERAR-CGI?$url"; my $req = new HTTP::Request 'POST' => "$http"; $res = $ua->request($req); print "Resultado: " . $res->content; A questão é se o arquivo tem que passar por um processo de transformação (transformar em uma linha binária, ...) antes de enviar para o http. Do modo que eu estou demonstrando, não vai funcionar, pois o http que vai receber não vai entender que é um arquivo binário (multipart/form-data). Então como tem que ser feito? --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/vitoria/attachments/20051109/76547b80/attachment.html From jamorreu em gmail.com Wed Nov 9 11:21:59 2005 From: jamorreu em gmail.com (=?ISO-8859-1?Q?Jo=E3o_Gabriel?=) Date: Wed, 9 Nov 2005 16:21:59 -0300 Subject: [Vitoria-pm] Enviar um arquivo via http In-Reply-To: <20051109003154.10887.qmail@web35105.mail.mud.yahoo.com> References: <20051109003154.10887.qmail@web35105.mail.mud.yahoo.com> Message-ID: <8ff2963a0511091121v88ab479w@mail.gmail.com> Marcos, verifique a documentação do http::request para saber se há essa opção... Verifique também se o script que irá receber o arquivo está preparado pra receber tal arquivo... -- []'s João Gabriel CGiClube.net - www.cgiclube.net Vitória Perl Mongers - vitoria.pm.org Em 08/11/05, Marcos Bastos escreveu: > > > Olá pessoal, > > Meu mail teve problemas, se esta mensagem foi enviada duas vezes, > me desculpe. > > > meu problema é o seguinte. Como enviar um arquivo.zip via http::request para > outro sevidor. > > No meu caso eu não estou recebendo um arquivo via http. Eu tenho é que > enviar para outro servidor. > > EX: > ... > my $url = "CAMPO1=&campo2=1234&campo3=abc&...."; > my $http = "http://192.1.1.1/cgi-bin/GERAR-CGI?$url"; > my $req = new HTTP::Request 'POST' => "$http"; > $res = $ua->request($req); > print "Resultado: " . $res->content; > > > A questão é se o arquivo tem que passar por um processo de transformação > (transformar em uma linha binária, ...) antes de enviar para o http. > Do modo que eu estou demonstrando, não vai funcionar, pois o http que vai > receber não vai entender que é um arquivo binário (multipart/form-data). > Então como tem que ser feito? > > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador agora! > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador agora! > > > > > _______________________________________________ > Vitoria mailing list > Vitoria em pm.org > http://mail.pm.org/mailman/listinfo/vitoria > > > From marcosbastosz em yahoo.com.br Wed Nov 9 18:34:33 2005 From: marcosbastosz em yahoo.com.br (Marcos Bastos) Date: Thu, 10 Nov 2005 02:34:33 +0000 (GMT) Subject: [Vitoria-pm] Enviar um arquivo via http In-Reply-To: <20051109002613.99734.qmail@web35115.mail.mud.yahoo.com> Message-ID: <20051110023433.24145.qmail@web35105.mail.mud.yahoo.com> Pessoal, estou sen noção de como criar uma função que me atenda. Alguem tem como me ajudar. O HTTP::Request não traz uma explicação. Tem outro package que faz isso que eu estou precisando. Marcos Bastos escreveu: Olá pessoal, meu problema é o seguinte. Como enviar um arquivo.zip via http::request para outro sevidor. No meu caso eu não estou recebendo um arquivo via http. Eu tenho é que enviar para outro servidor. EX: ... my $url = "CAMPO1=&campo2=1234&campo3=abc&...."; my $http = "http://192.1.1.1/cgi-bin/GERAR-CGI?$url"; my $req = new HTTP::Request 'POST' => "$http"; $res = $ua->request($req); print "Resultado: " . $res->content; A questão é se o arquivo tem que passar por um processo de transformação (transformar em uma linha binária, ...) antes de enviar para o http. Do modo que eu estou demonstrando, não vai funcionar, pois o http que vai receber não vai entender que é um arquivo binário (multipart/form-data). Então como tem que ser feito? --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora!_______________________________________________ Vitoria mailing list Vitoria em pm.org http://mail.pm.org/mailman/listinfo/vitoria --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/vitoria/attachments/20051110/fd348b43/attachment.html From jamorreu em gmail.com Thu Nov 10 12:34:13 2005 From: jamorreu em gmail.com (=?ISO-8859-1?Q?Jo=E3o_Gabriel?=) Date: Thu, 10 Nov 2005 17:34:13 -0300 Subject: [Vitoria-pm] Enviar um arquivo via http In-Reply-To: <20051110023433.24145.qmail@web35105.mail.mud.yahoo.com> References: <20051109002613.99734.qmail@web35115.mail.mud.yahoo.com> <20051110023433.24145.qmail@web35105.mail.mud.yahoo.com> Message-ID: <8ff2963a0511101234p7ae91202y@mail.gmail.com> Marcos, procurei no CPAN.org e não encontrei nenhum módulo que satisfaça as suas necessidades... peço-lhe que se inscreva na lista do Cascavel Perl Mongers (http://cascavel.pm.org) pois lá há muitos mais membros que poderão lhe ajudar. Infelismente aqui no Vitória PM só tem eu ativo na mail-list para de tar suporte... -- []'s João Gabriel CGiClube.net - www.cgiclube.net Vitória Perl Mongers - vitoria.pm.org Em 09/11/05, Marcos Bastos escreveu: > Pessoal, > > estou sen noção de como criar uma função que me atenda. > Alguem tem como me ajudar. > > O HTTP::Request não traz uma explicação. Tem outro package que faz isso que > eu estou precisando. > > Marcos Bastos escreveu: > > Olá pessoal, > > meu problema é o seguinte. Como enviar um arquivo.zip via http::request para > outro sevidor. > > No meu caso eu não estou recebendo um arquivo via http. Eu tenho é que > enviar para outro servidor. > > EX: > ... > my $url = "CAMPO1=&campo2=1234&campo3=abc&...."; > my $http = "http://192.1.1.1/cgi-bin/GERAR-CGI?$url"; > my $req = new HTTP::Request 'POST' => "$http"; > $res = $ua->request($req); > print "Resultado: " . $res->content; > > > A questão é se o arquivo tem que passar por um processo de transformação > (transformar em uma linha binária, ...) antes de enviar para o http. > Do modo que eu estou demonstrando, não vai funcionar, pois o http que vai > receber não vai entender que é um arquivo binário (multipart/form-data). > Então como tem que ser feito? > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador agora! > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador > agora!_______________________________________________ > Vitoria mailing list > Vitoria em pm.org > http://mail.pm.org/mailman/listinfo/vitoria > > > > > > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador agora! > > ________________________________ > Yahoo! Acesso Grátis: Internet rápida e grátis. > Instale o discador agora! > > > > > _______________________________________________ > Vitoria mailing list > Vitoria em pm.org > http://mail.pm.org/mailman/listinfo/vitoria > > >