[SP-pm] Duvida como usar CatalystX::AuthenCookie
Daniel de Oliveira Mantovani
daniel.oliveira.mantovani at gmail.com
Mon Jul 22 10:33:03 PDT 2013
Na synopsis mostra como usar:
package MyApp;
use Moose;
extends 'Catalyst';
with 'CatalystX::AuthenCookie';
package MyApp::Controller;
use Moose;
BEGIN { extends 'Catalyst::Controller' }
sub login {
my $self = shift;
my $c = shift;
$c->set_authen_cookie( value => { user_id => 1234 } );
}
sub _check_login {
my $self = shift;
my $c = shift;
my $value = $c->authen_cookie_value();
print $value->{user_id};
}
sub logout {
my $self = shift;
my $c = shift;
$c->unset_authen_cookie();
}
BTW, dentro do core da sua aplicacao coloque apenas "AuthenCookie"
dentro do "qw//;". Cola o core da sua app que eu te ensino a usar.
2013/7/22 Daniel de Oliveira Mantovani <daniel.oliveira.mantovani at gmail.com>:
> Ricardo, dentro do pacote existe um pasta chamada "t". Nessa pasta
> ficam os testes, provavelmente existe algum exemplo la.
>
> 2013/7/22 Ricardo Alcantara <alcantarafox at yahoo.com.br>:
>> Eu tentei colocar nessa lista também, porem não soube o que colocar. Tentei
>> 'CatalystX::AuthenCookie', 'AuthenCookie' e 'authen_cookie' porem sem
>> sucesso e como no site do metacpan ele não fala nada para colocar achei que
>> não precisaria. Sabe qual parâmetro preciso colocar para carregar esse
>> modulo?
>>
>> =begin disclaimer
>> Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>> SaoPaulo-pm mailing list: SaoPaulo-pm at pm.org
>> L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
>> =end disclaimer
>
>
>
> --
>
> -dom
>
> --
>
> IBM - Business Analytics Optimization Consultant
> Daniel Mantovani +5511 8538-9897
> XOXO
--
-dom
--
IBM - Business Analytics Optimization Consultant
Daniel Mantovani +5511 8538-9897
XOXO
More information about the SaoPaulo-pm
mailing list