Yet Another CPAN Grep

Firebase ( R/RI/RIZEN/Firebase-1.0002.tar.gz, RIZEN, 2014; MetaCPAN )

Firebase/lib/Firebase.pm ( view source; MetaCPAN )

 Firebase::Auth;
use HTTP::Thin;
use HTTP::Request::Common qw(DELETE PUT GET POST);
use Ouch;
use JSON;
use URI;

has firebase => (
    is          => 'ro',
    required    => 1,
);

has auth => (

te_uri($path);
    my $request = POST($uri->as_string, Content_Type => 'form-data', Content => to_json($params));
    $request->method('PUT'); # because HTTP::Request::Common treats PUT as GET rather

te_uri($path);
    my $request = POST($uri->as_string, Content_Type => 'form-data', Content => to_json($params));
    $request->method('PATCH'); # because HTTP::Request::Common treats PUT as GET rathe

Firebase ( R/RI/RIZEN/Firebase-1.0002.tar.gz, RIZEN, 2014; MetaCPAN )

Firebase/lib/Firebase/Auth.pm ( view source; MetaCPAN )

irebase::Auth::VERSION = '1.0002';
use strict;
use warnings;
use Digest::SHA qw(hmac_sha256);
use JSON::XS;
use POSIX;
use MIME::Base64;
use Moo;
use Ouch;


has token_version => (
    is      => 'rw'

) = @_;
    my $ejsn = JSON::XS->new->utf8->space_after->encode ({'typ'=> 'JWT', 'alg'=> 'HS256'}) ;
    my $encoded_header = $self->urlbase64_encode( $ejsn);
    my $eclm = JSON::XS->new->utf8->space