Yet Another CPAN Grep

GitHub-Authorization ( R/RS/RSRCHBOY/GitHub-Authorization-0.001.tar.gz, RSRCHBOY, 2013; MetaCPAN )

GitHub-Authorization/lib/GitHub/Authorization.pm ( view source; MetaCPAN )

b OAuth2 non-web authorization token

use strict;
use warnings;
use Carp 'confess';

use autobox::JSON;
use HTTP::Tiny;
use MIME::Base64;
use Params::Validate ':all';

# for SSL and SSL CA verificatio

to_json,
    });

    ### $res;

    confess "Failed: $res->{status}/$res->{reason} / " . $res->{content}->from_json->{message}
        unless $res->{success};

    return $res->{content}->from_json;