<html><head><meta http-equiv="Content-Type" content="text/html charset=iso-8859-1"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><span class="Apple-tab-span" style="white-space:pre"> </span></div><div><span class="Apple-tab-span" style="white-space:pre"> </span>A propósito session é uma coisa bem diferente de cookie.</div><div><br></div><br><div><div>Em 23/07/2013, às 09:39, Eden Cardim <<a href="mailto:eden@insoli.de">eden@insoli.de</a>> escreveu:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div dir="ltr"><div class="gmail_extra"><div class="gmail_quote">On Tue, Jul 23, 2013 at 3:47 AM, Nelson Ferraz <span dir="ltr"><<a href="mailto:nferraz@gmail.com" target="_blank">nferraz@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Tudo isso pra setar um cookie? <div><br></div><div>Sem querer iniciar uma flamewar, mas com o Mojolicious::Lite e' bem simples:<div>
<br></div><div>#####</div><div><br></div><div>use Mojolicious::Lite;</div>
<div><br></div><div><div>get '/login' => sub {<br></div><div> my $self = shift;</div><div><br></div><div> # Query parameters</div><div> my $user = $self->param('user') || '';</div><div>
my $pass = $self->param('pass') || '';</div><div><br></div><div><div> # Store username in session</div><div> $self->session(user => $user);</div></div><div><br></div><div>} => 'index';</div>
</div></div></div></blockquote><div><br>É exatamente a mesma coisa no Catalyst se você usar o Catalyst::Plugin::Session:<br><br>use Catalyst qw/Session/;<br><br>sub login :Path {<br> my($self, $c) = @_;<br><br> my $user = $c->req->param('user');<br>
my $pass = $c->req->param('pass');<br> <br> $c->session(user => $user);<br>}<br><br>O CatalystX::AuthenCookie é apenas uma implementação alternativa que existe porque TIMTOWTDI.</div></div></div></div>
=begin disclaimer<br> Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/">http://sao-paulo.pm.org/</a><br> SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br> L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>=end disclaimer<br></blockquote></div><br></body></html>