Yet Another CPAN Grep

GoogleIDToken-Validator ( D/DI/DIMANOID/GoogleIDToken-Validator-0.02.tar.gz, DIMANOID, 2013; MetaCPAN )

GoogleIDToken-Validator/lib/GoogleIDToken/Validator.pm ( view source; MetaCPAN )

URLSafe;
use Crypt::OpenSSL::X509;
use Crypt::OpenSSL::RSA;
use Date::Parse;
use LWP::Simple;
use JSON;

=head1 NAME

GoogleIDToken::Validator - allows you to verify on server side Google Access Token


    
    $signature = urlsafe_b64decode($signature);
    $env = decode_json(urlsafe_b64decode($env));
    $payload = decode_json(urlsafe_b64decode($payload));
    
    
    if(!exists $self->{certs}-

he file($self->{certs_cache_file}): $!";
    my $json_certs = '';
    while(<$fh>) { $json_certs .= $_ }
    if($json_certs) {
	$self->parse_certs($json_certs);
    } else {
	$self->{certs} = undef;