Yet Another CPAN Grep

Net-BrowserID-Verify ( C/CH/CHILTS/Net-BrowserID-Verify-0.003.tar.gz, CHILTS, 2013; MetaCPAN )

Net-BrowserID-Verify/lib/Net/BrowserID/Verify.pm ( view source; MetaCPAN )

:UserAgent;
use JSON::Any;
use HTTP::Request::Common qw(POST);

our @EXPORT_OK = qw(verify_remotely);
my $REMOTE_VERIFIER = 'https://verifier.login.persona.org/verify';

my $json = JSON::Any->new;

ha

ata;

    if ($resp->is_success) {
        my $message = $resp->decoded_content;
        $data = $json->decode($message);
    }
    else {
        $data = {
            status => 'failure',