se Net::Google::DataAPI::Auth::OAuth2;
use Net::OAuth2::AccessToken;
use Text::CSV;
use Furl;
use JSON;
use Sub::Retry;
sub new {
state $rule = Data::Validator->new(
client_id => { i
my $headers = [];
if ($content) {
push @$headers, 'Content-Type' => 'application/json';
}
if ($opt->{headers}) {
push @$headers, @{ $opt->{headers} };
}
my $r
url => $url,
headers => $headers,
$content ? (content => encode_json($content)) : (),
);
}, sub {
my $res = shift;
if (!$res) {