[Rio-pm] Entendendo

Daniel de Oliveira Mantovani daniel.oliveira.mantovani em gmail.com
Sexta Setembro 12 21:13:24 PDT 2008


Muito obrigado Frederico.
Aproveitando, queria navegar no gmail olhei o manual e estou fazendo mas não
funciona, o problema é o cookie não consigo navegar com os cookies, olha:
my $url = "www.gmail.com";
require LWP::UserAgent;
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->env_proxy;
$ua->cookie_jar(HTTP::Cookies->new("JSESSIONID=13AE25B259BB2FD23882FDC56B1DC208"));
my $response = $ua->get("$url");
my $conteudo = $response->content;

Como teria que ficar para que na hora que ele "GET" o site ele usar os
cookies ?

2008/9/13 Frederico Recsky <frederico em gmail.com>

> Olá,
>
> 2008/9/12 Daniel de Oliveira Mantovani <
> daniel.oliveira.mantovani em gmail.com>:
> >
> > Boa noite pessoal, não estou entendendo algumas partes desse programa,
> > olhem:
> > #!/usr/bin/perl
> >
> > use strict;
> > use warnings;
> > use CGI qw( :standard );
> >
> > our ($name, $value) = split ( "=", $ENV{ QUERY_STRING} );
> >
> > print header(),start_html("Simple Life Corp");
> > print h1(align_center("Simple Life Corp"));
> > print p('Entre com apenas uma palavra favorita sua aqui: ');
> > print '<form method = "GET" action = "aplicativo.pl">';
> > print '<input type ="text" name = "word">';
> > print '<input type = "submit" value = "Submit Word">';
> > if ($name eq 'word'){
> > print p(' Sua palavra favorita: ',b($value) );
> > }
> > print end_html();
> >
> >
> > sub align_center
> > {
> > my $align_center = shift;
> > return "<p align=center>$align_center</p>"
> > }
> >
> > A linha em negrito que é responsável pelo valor que eu envio da caixa
> chegar
> > ao nome?
> > Isso me confundiu completamente.
>
> Sim.
>
> Na verdade é onde voce recebe a informação quando posta no formulario
> da pagina .  Você ta pegando essa informação na mão.  No mesmo modulo
> CGI tem como pegar os parametros de forma bem mais amigavel.
>
>
> http://search.cpan.org/~lds/CGI.pm-3.42/CGI.pm#FETCHING_THE_NAMES_OF_ALL_THE_PARAMETERS_PASSED_TO_YOUR_SCRIPT<http://search.cpan.org/%7Elds/CGI.pm-3.42/CGI.pm#FETCHING_THE_NAMES_OF_ALL_THE_PARAMETERS_PASSED_TO_YOUR_SCRIPT>
> :
>
> Não sei se voce olhou a mecanica do CGI (em geral, não só Perl), como
> é feito post, get , forms,  etc..  Se você entendeu como funciona pode
> pular direto para as funções prontas e não precisa ficar sofrendo
> fazendo na mão, mesmo que seja para "aprender".
>
> []'s
>
> --
> ____________________________
> Frederico Recsky
> Linux User: #253572
> http://www.fred.eti.br
> http://www.perl.org.br
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>



-- 
Daniel de Oliveira Mantovani
"A sede pelo aprendizado é insaciável"
http://mantovanihouse.blogspot.com/
------------------------------------------------------------
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20080913/4fbed028/attachment.html>


Mais detalhes sobre a lista de discussão Rio-pm