[SP-pm] Problema com cookie, não esta gravando
Eduardo Maia
maia at eduardomaia.com
Mon Jul 2 15:27:51 PDT 2012
Pô, cara, tu tá imprimindo o header duas vezes. Tira esse print
"Content-type: text/html\n\n";
2012/7/2 Lucas Moraes <lucastiagodemoraes em gmail.com>
> O script completo:
> #!/usr/bin/perl -w
>
> use strict;
> use warnings;
> use CGI;
> use CGI::Session;
>
> print "Content-type: text/html\n\n";
>
> my $login = "lucas";
> my $pass = "abc";
>
> my $q = CGI->new;
>
> if($login eq $q->param('login') && $pass eq $q->param('pass')){
> my $session = CGI::Session->new();
> my $cookie = $q->cookie(-name=>'session', -value=> $session->id,
> -expires => '+1h', -path => '/tmp');
> print $q->header(-cookie => $cookie);
> $session->param('login', $login);
> }
>
> a saida é só isso:
> Set-Cookie: session=307fd3f5783735563cc14f3741881f90; path=/tmp;
> expires=Mon, 02-Jul-2012 23:25:00 GMT Date: Mon, 02 Jul 2012 22:25:00
> GMT Content-Type: text/html; charset=ISO-8859-1
>
> Em 2 de julho de 2012 19:19, Gabriel Vieira <gabriel.vieira em gmail.com>
> escreveu:
> > manda o output da tua app... tem q ver se ta indo no header direitinho
> >
> > 2012/7/2 Lucas Moraes <lucastiagodemoraes em gmail.com>:
> >> Eduardo Maia, também não esta no navegador, eu verifiquei.
> >>
> >> Estou usando localmente, veja os cookies local
> >> http://imageshack.us/photo/my-images/842/capturadetelade20120702.png/
> >>
> >> nenhum com o nome "session"
> >>
> >> Em 2 de julho de 2012 19:11, Eduardo Maia <maia em eduardomaia.com>
> escreveu:
> >>> Lucas, o $ENV{'HTTP_COOKIE'} pode não imprimir um cookie que foi
> setado com
> >>> sucesso, um exemplo desta ocorrência está no arquivo que eu enviei.
> Você
> >>> poderia enviar pra gente um screenshot dos cookies armazenados no seu
> >>> navegador web? Porque pelo código que você enviou, o cookie parece que
> foi
> >>> setado corretamente...
> >>>
> >>> Abs
> >>>
> >>>
> >>> 2012/7/2 Lucas Moraes <lucastiagodemoraes em gmail.com>
> >>>>
> >>>> Não esta gravando não, eu já tinha olhado com $ENV{'HTTP_COOKIE'}, já
> >>>> setei o path também e nada.
> >>>>
> >>>> Em 2 de julho de 2012 18:59, Gabriel Vieira <gabriel.vieira em gmail.com
> >
> >>>> escreveu:
> >>>> > Viu as configurações do chrome? Consegue visualizar o Cookie nos
> >>>> > settings do chrome?
> >>>> >
> >>>> > Mostra todo o output gerado pela tua app.
> >>>> >
> >>>> > 2012/7/2 Lucas Moraes <lucastiagodemoraes em gmail.com>:
> >>>> >> Gabriel estou usando Chrome.
> >>>> >>
> >>>> >> Fernando é tudo no mesmo script. faço autenticação, na página que é
> >>>> >> redirecionado já não consigo acessar e nem na própria página que é
> >>>> >> gerado.
> >>>> >>
> >>>> >> Falou.
> >>>> >>
> >>>> >>
> >>>> >> Em 2 de julho de 2012 18:45, Fernando Oliveira
> >>>> >> <fernandocorrea em gmail.com> escreveu:
> >>>> >>> Outra pagina em outro domínio?
> >>>> >>>
> >>>> >>>
> >>>> >>>
> >>>> >>> Just another Perl Hacker,
> >>>> >>> Fernando (SmokeMachine)
> >>>> >>>
> >>>> >>>
> >>>> >>> Em 2 de julho de 2012 18:43, Lucas Moraes
> >>>> >>> <lucastiagodemoraes em gmail.com>
> >>>> >>> escreveu:
> >>>> >>>>
> >>>> >>>> Estou gerando o cookie com o código;
> >>>> >>>> my $cookie = $q->cookie(-name=>'session', -value=> $session->id,
> >>>> >>>> -expires => '+1h');
> >>>> >>>> print $q->header(-cookie => $cookie);
> >>>> >>>>
> >>>> >>>> Resultado:
> >>>> >>>> Set-Cookie: session=92ce2cbd31e66e52aae6038f444812bc; path=/;
> >>>> >>>> expires=Mon, 02-Jul-2012 22:37:16 GMT Date: Mon, 02 Jul 2012
> 21:37:16
> >>>> >>>> GMT Content-Type: text/html; charset=ISO-8859-1
> >>>> >>>>
> >>>> >>>> Mas quando tento acessar o cookie outra página, cade o cookie.
> >>>> >>>> Não esta gravando, minha maquina é ubuntu 12.04 64bit
> >>>> >>>>
> >>>> >>>> Alguém tem ideia do que pode ser?
> >>>> >>>>
> >>>> >>>> Obrigado e ate mais.
> >>>> >>>> =begin disclaimer
> >>>> >>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>>> >>>> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>>> >>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>>> >>>> =end disclaimer
> >>>> >>>
> >>>> >>>
> >>>> >>>
> >>>> >>> =begin disclaimer
> >>>> >>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>>> >>> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>>> >>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>>> >>> =end disclaimer
> >>>> >>>
> >>>> >> =begin disclaimer
> >>>> >> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>>> >> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>>> >> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>>> >> =end disclaimer
> >>>> >
> >>>> >
> >>>> >
> >>>> > --
> >>>> > Gabriel Vieira
> >>>> > =begin disclaimer
> >>>> > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>>> > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>>> > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>>> > =end disclaimer
> >>>> =begin disclaimer
> >>>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>>> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>>> =end disclaimer
> >>>
> >>>
> >>>
> >>> =begin disclaimer
> >>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >>> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >>> =end disclaimer
> >>>
> >> =begin disclaimer
> >> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> >> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> >> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> >> =end disclaimer
> >
> >
> >
> > --
> > Gabriel Vieira
> > =begin disclaimer
> > Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> > SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> > L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> > =end disclaimer
> =begin disclaimer
> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
> SaoPaulo-pm mailing list: SaoPaulo-pm em pm.org
> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20120702/02182c59/attachment.html>
More information about the SaoPaulo-pm
mailing list