| line |
true |
false |
branch |
|
38
|
0 |
0 |
($a = (shift())->key) ? : |
|
42
|
0 |
0 |
unless my $path = shift() |
|
44
|
0 |
0 |
if (defined $s->delay) |
|
49
|
0 |
0 |
if ($params) { } |
|
59
|
0 |
0 |
unless ($res) |
|
60
|
0 |
0 |
if ($tx->res->code and $tx->res->code == 404) |
|
69
|
0 |
0 |
unless (my $json = $res->json) |
|
74
|
0 |
0 |
wantarray && ref $json eq 'ARRAY' ? : |
|
79
|
0 |
0 |
unless my $path = shift() |
|
83
|
0 |
0 |
unless (my $res = $tx->success) |
|
87
|
0 |
0 |
unless $res |
|
88
|
0 |
0 |
unless my $json = $res->json |
|
96
|
0 |
0 |
$payload ? : |
|
99
|
0 |
0 |
unless ($res) |
|
100
|
0 |
0 |
if ($tx->res->code and $tx->res->code == 404) |
|
118
|
0 |
0 |
unless (my $res = $tx->success) |
|
124
|
0 |
0 |
unless $res |
|
125
|
0 |
0 |
unless my $json = $res->json |
|
144
|
0 |
0 |
unless (my $res = $tx->success) |
|
145
|
0 |
0 |
unless $tx->res->code == 404 |
|
148
|
0 |
0 |
unless $res |
|
149
|
0 |
0 |
unless my $json = $res->json |
|
156
|
0 |
0 |
unless $s->url |
|
158
|
0 |
0 |
unless -e $conf_file |
|
161
|
0 |
0 |
if @found > 1 |
|
162
|
0 |
0 |
if @found < 1 |
|
163
|
0 |
0 |
unless my $key = $found[0]{'key'} |
|
171
|
0 |
0 |
unless my $got = $c->get('/login') |
|
172
|
0 |
0 |
unless $c->get('/login')->{'login'} eq 'ok' |
|
178
|
0 |
0 |
unless my $url = $ENV{'GCIS_API_URL'} |
|
185
|
0 |
0 |
unless my $report = shift() |
|
186
|
0 |
0 |
unless my $all = $c->get("/report/$report/chapter?all=1") |
|
188
|
0 |
0 |
wantarray ? : |
|
194
|
0 |
0 |
unless my $report = $a{'report'} |
|
195
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
200
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
201
|
0 |
0 |
unless $tables = $c->get("/report/$report/chapter/$chapter/table?all=1") |
|
203
|
0 |
0 |
unless $tables = $c->get("/report/$report/table?all=1") |
|
205
|
0 |
0 |
wantarray ? : |
|
211
|
0 |
0 |
unless my $report = $a{'report'} |
|
212
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
217
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
218
|
0 |
0 |
unless $figures = $c->get("/report/$report/chapter/$chapter/figure?all=1") |
|
220
|
0 |
0 |
unless $figures = $c->get("/report/$report/figure?all=1") |
|
222
|
0 |
0 |
wantarray ? : |
|
228
|
0 |
0 |
unless my $report = $a{'report'} |
|
229
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
234
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
235
|
0 |
0 |
unless $findings = $c->get("/report/$report/chapter/$chapter/finding?all=1") |
|
237
|
0 |
0 |
unless $findings = $c->get("/report/$report/finding?all=1") |
|
239
|
0 |
0 |
wantarray ? : |
|
245
|
0 |
0 |
unless my $uri = $$obj{'uri'} |
|
246
|
0 |
0 |
if ($uri =~ m[/article]u) { } |
|
259
|
0 |
0 |
unless my $url = $args{'url'} |
|
262
|
0 |
0 |
unless $c->find_credentials->login |