line |
true |
false |
branch |
57
|
0 |
0 |
if ($params->{'config_file'}) { } |
|
0 |
0 |
elsif ($params->{'config_json'}) { } |
68
|
0 |
0 |
if $params->{'debug'} |
77
|
0 |
0 |
if scalar(@_) % 2 |
85
|
0 |
0 |
if scalar(@_) % 2 |
88
|
0 |
0 |
if $opt->{'body'} |
94
|
0 |
0 |
if scalar(@_) % 2 |
104
|
0 |
0 |
if $opt->{'resource'} eq 'custom' |
106
|
0 |
0 |
if ($opt->{'resource'} eq 'products' or $opt->{'resource'} eq 'productstatuses' or $opt->{'resource'} eq 'accountstatuses') |
111
|
0 |
0 |
if $opt->{'method'} ne 'batch' |
113
|
0 |
0 |
if $opt->{'method'} eq 'list' |
114
|
0 |
0 |
if $opt->{'method'} eq 'insert' |
116
|
0 |
0 |
if $opt->{'method'} =~ /get|delete/ |
119
|
0 |
0 |
if $opt->{'params'} |
122
|
0 |
0 |
if $opt->{'resource'} ne '' |
123
|
0 |
0 |
if $opt->{'method'} ne '' |
124
|
0 |
0 |
if $encoded_params |
143
|
0 |
0 |
if $self->{'debug'} |
146
|
0 |
0 |
unless ($rest->responseCode eq '200') |
147
|
0 |
0 |
if ($rest->responseCode eq '204' and $command[0] eq 'DELETE') { } |
|
0 |
0 |
elsif ($rest->responseCode eq '401') { } |
160
|
0 |
0 |
if $self->{'debug'} |
162
|
0 |
0 |
$rest->responseContent ? : |
196
|
0 |
0 |
if $self->{'debug'} |
198
|
0 |
0 |
unless ($response->is_success) |
208
|
0 |
0 |
unless open my $fh, '<', $json_file |