[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