line |
true |
false |
branch |
59
|
0 |
0 |
if ($params->{'config_file'}) { } |
|
0 |
0 |
elsif ($params->{'config_json'}) { } |
74
|
0 |
0 |
if $params->{'debug'} |
83
|
0 |
0 |
if scalar(@_) % 2 |
91
|
0 |
0 |
if scalar(@_) % 2 |
94
|
0 |
0 |
if $opt->{'body'} |
100
|
0 |
0 |
if scalar(@_) % 2 |
110
|
0 |
0 |
if $opt->{'resource'} eq 'custom' |
112
|
0 |
0 |
if ($opt->{'resource'} eq 'products' or $opt->{'resource'} eq 'productstatuses' or $opt->{'resource'} eq 'accountstatuses') |
117
|
0 |
0 |
if $opt->{'method'} ne 'batch' |
119
|
0 |
0 |
if $opt->{'method'} eq 'list' |
120
|
0 |
0 |
if $opt->{'method'} eq 'insert' |
122
|
0 |
0 |
if $opt->{'method'} =~ /get|delete/ |
125
|
0 |
0 |
if $opt->{'params'} |
128
|
0 |
0 |
if $opt->{'resource'} ne '' |
129
|
0 |
0 |
if $opt->{'method'} ne '' |
130
|
0 |
0 |
if $encoded_params |
149
|
0 |
0 |
if $self->{'debug'} |
152
|
0 |
0 |
unless ($rest->responseCode eq '200') |
153
|
0 |
0 |
if ($rest->responseCode eq '204' and $command[0] eq 'DELETE') { } |
|
0 |
0 |
elsif ($rest->responseCode eq '401') { } |
166
|
0 |
0 |
if $self->{'debug'} |
168
|
0 |
0 |
$rest->responseContent ? : |
202
|
0 |
0 |
if $self->{'debug'} |
204
|
0 |
0 |
unless ($response->is_success) |
214
|
0 |
0 |
unless open my $fh, '<', $json_file |