—package
Document::eSign::Docusign::getToken;
use
strict;
use
warnings;
use
Carp;
use
Data::Dumper;
=head1 NAME
Document::eSign::Docusign::getToken - Retrieves an OAUTH2 token.
=head1 VERSION
Version 0.02
=cut
=head1 functions
=head2 getToken($varshashref)
my $response = $ds->getToken(
{
grant_type => 'password', # only option
scope => 'api' # only option
}
);
=cut
sub
new {
carp(
"Got token request: "
. Dumper(
@_
))
if
$_
[1]->debug;
my
$class
=
shift
;
my
$main
=
shift
;
my
$vars
=
shift
;
my
$self
=
bless
{},
$class
;
my
$uri
=
'/v2/oauth2/token'
;
# Build the portions of the get string as needed.
my
$creds
=
$main
->buildCredentials();
my
$response
=
$main
->sendRequest(
'POST'
,
'application/json'
,
$creds
,
$main
->defaultUrl .
$uri
,
$vars
);
return
$response
;
}
1;