lf = {name => $args->{name}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
$args->{youtubeAudienceSize}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
$args->{plannableTargeting}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
args->{youtubeSelectLineups}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
=> $args->{resourceName}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
GoogleAds::Constants::VERSION};
use Class::Std::Fast;
use JSON::SL;
use constant JSON_POINTER_RESULTS => "/^/results";
use constant JSON_POINTER_REQUEST_ID => "/^/requestId";
# Class::Std-style
TTR(:name<service> :default<>);
my %request_of : ATTR(:name<request> :default<>);
my %json_sl_of : ATTR(:name<json_sl> :default<>);
# Automatically called by Class::Std after the values for all the a
nt) = @_;
$json_sl_of{$ident} ||= JSON::SL->new();
# Set the query path to "results" for the JSON::SL object.
$json_sl_of{$ident}
->set_jsonpointer([JSON_POINTER_RESULTS, JSON_POINTER_REQUE
sponse => $args->{response}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
> $args->{fieldPathElements}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
=> $args->{limitType}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
index => $args->{index}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
utubeVideoRegistrationError}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
=> $args->{key}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
rigger => $args->{trigger}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
uestId => $args->{requestId}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
Delay => $args->{retryDelay}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
lf = {name => $args->{name}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
lf = {name => $args->{name}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
$args->{pollTimeoutSeconds}};
# Delete the unassigned fields in this object for a more concise JSON payload
remove_unassigned_fields($self, $args);
bless $self, $class;
return $self;
}
1;
g::DetailStats;
use File::HomeDir;
use File::Spec;
use Log::Log4perl qw(get_logger :levels);
use JSON::XS;
# Module initialization.
# This is the log4perl configuration format.
my $logs_folder
ses the fault message from the HTTP response JSON payload.
sub __parse_fault_message {
my $response_content = shift;
my $response_body = decode_json($response_content);
# When the fault is a
s from the HTTP response JSON payload.
sub __parse_faults {
my $response_content = shift;
my $json_coder = JSON::XS->new->utf8->pretty;
my $response_body = $json_coder->decode($response
nstants; our $VERSION = ${Google::Ads::GoogleAds::Constants::VERSION};
use Class::Std::Fast;
use JSON::XS;
use Encode qw( encode_utf8 decode_utf8 );
# A list of fields in HTTP headers, content and G
nt);
$response_content = _scrub_content($response_content) if $response_content;
my $json_coder = JSON::XS->new->utf8->pretty;
my $detail_message = sprintf(
"Request\n" .
"-------
n" . "-------\n" . "Headers: %s\n",
$method, $host, $json_coder->encode({%$request_headers}),
$request_content, $json_coder->encode({%$response_headers}));
$detail_message .= "Resp