| 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 |
|
98
|
0 |
0 |
unless ($res) |
|
99
|
0 |
0 |
if ($tx->res->code and $tx->res->code == 404) |
|
117
|
0 |
0 |
unless (my $res = $tx->success) |
|
123
|
0 |
0 |
unless $res |
|
124
|
0 |
0 |
unless my $json = $res->json |
|
143
|
0 |
0 |
unless (my $res = $tx->success) |
|
144
|
0 |
0 |
unless $tx->res->code == 404 |
|
147
|
0 |
0 |
unless $res |
|
148
|
0 |
0 |
unless my $json = $res->json |
|
155
|
0 |
0 |
unless $s->url |
|
157
|
0 |
0 |
unless -e $conf_file |
|
160
|
0 |
0 |
if @found > 1 |
|
161
|
0 |
0 |
if @found < 1 |
|
162
|
0 |
0 |
unless my $key = $found[0]{'key'} |
|
170
|
0 |
0 |
unless my $got = $c->get('/login') |
|
171
|
0 |
0 |
unless $c->get('/login')->{'login'} eq 'ok' |
|
177
|
0 |
0 |
unless my $url = $ENV{'GCIS_API_URL'} |
|
184
|
0 |
0 |
unless my $report = shift() |
|
185
|
0 |
0 |
unless my $all = $c->get("/report/$report/chapter?all=1") |
|
187
|
0 |
0 |
wantarray ? : |
|
193
|
0 |
0 |
unless my $report = $a{'report'} |
|
194
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
199
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
200
|
0 |
0 |
unless $tables = $c->get("/report/$report/chapter/$chapter/table?all=1") |
|
202
|
0 |
0 |
unless $tables = $c->get("/report/$report/table?all=1") |
|
204
|
0 |
0 |
wantarray ? : |
|
210
|
0 |
0 |
unless my $report = $a{'report'} |
|
211
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
216
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
217
|
0 |
0 |
unless $figures = $c->get("/report/$report/chapter/$chapter/figure?all=1") |
|
219
|
0 |
0 |
unless $figures = $c->get("/report/$report/figure?all=1") |
|
221
|
0 |
0 |
wantarray ? : |
|
227
|
0 |
0 |
unless my $report = $a{'report'} |
|
228
|
0 |
0 |
if (my $chapter_number = $a{'chapter_number'}) |
|
233
|
0 |
0 |
if (my $chapter = $a{'chapter'}) { } |
|
234
|
0 |
0 |
unless $findings = $c->get("/report/$report/chapter/$chapter/finding?all=1") |
|
236
|
0 |
0 |
unless $findings = $c->get("/report/$report/finding?all=1") |
|
238
|
0 |
0 |
wantarray ? : |
|
244
|
0 |
0 |
unless my $uri = $$obj{'uri'} |
|
245
|
0 |
0 |
if ($uri =~ m[/article]u) { } |
|
258
|
0 |
0 |
unless my $url = $args{'url'} |
|
261
|
0 |
0 |
unless $c->find_credentials->login |