Yet Another CPAN Grep

WWW-SmartSheet ( M/MA/MANWAR/WWW-SmartSheet-0.06.tar.gz, MANWAR, 2018; MetaCPAN )

WWW-SmartSheet/lib/WWW/SmartSheet.pm ( view source; MetaCPAN )

Moo;
use MooX::late;

use Carp ();
use Data::Dumper qw(Dumper);
use LWP::UserAgent;
use JSON qw(from_json to_json);

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

has sheets => (is => 'rw', isa => 'Array

thorization" => "Bearer " . $self->token);
    $ua->default_header("Content-Type" => "application/json");
    return $ua;
}

sub get_current_user {
  my ($self) = @_;

  my $current_user = $self->_get

 "$API_URL/$path";
    my $ua = $self->ua;
    my $json = to_json($data);

    my $req = HTTP::Request->new( 'POST', $url );
    $req->content( $json );
    my $res = $ua->request( $req );

    Carp::