Advertisement
Guest User

Mojolicious Authentication Callback

a guest
Mar 22nd, 2014
122
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.20 KB | None | 0 0
  1. my $authenticated = $r->any('/')->to(cb => sub {
  2.     my $self = shift;
  3.  
  4.     $self->get('main#hate') and return 0 unless($self->is_user_authenticated);
  5.     $self->get('main#love') and return 1;
  6. });
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement