Yet Another CPAN Grep

Mojolicious-Plugin-MozPersona ( H/HJ/HJANSEN/Mojolicious-Plugin-MozPersona-0.05.tar.gz, HJANSEN, 2015; MetaCPAN )

Mojolicious-Plugin-MozPersona/lib/Mojolicious/Plugin/MozPersona/Controller.pm ( view source; MetaCPAN )

ctions for "Persona" authentication.

use Mojo::Base 'Mojolicious::Controller';

use Mojo::JSON qw(decode_json);

use Mozilla::CA qw();
use Data::Dumper;


sub signin {
    my $self = shift;

    $ENV

t = decode_json $persona_response->body;
    };

    if ($@) {
        $self->app->log->error("Error verifying assertion with IdP: $@");
        $self->render( json => { signin => Mojo::JSON->false }

( json => { signin => Mojo::JSON->true, result => $result } );
    }
}


sub signout {
    my $self = shift;
    delete $self->session->{_persona};
    $self->render( json => { signout => Mojo::JSON->