| line |
true |
false |
branch |
|
39
|
0 |
30 |
if (my $uri = $webapp->query->param('uri')) |
|
40
|
0 |
0 |
unless $arg{'urimd5'} |
|
44
|
0 |
90 |
if (my $param = $webapp->query->param($_)) |
|
49
|
9 |
21 |
unless (%arg) |
|
51
|
9 |
0 |
unless %arg |
|
73
|
8 |
22 |
if $$arg{'user'} |
|
76
|
0 |
60 |
if (defined $$arg{"has_$_"}) |
|
77
|
0 |
0 |
$$arg{"has_$_"} ? : |
|
80
|
0 |
30 |
if ($$arg{'exact_tags'}) { } |
|
|
13 |
34 |
elsif ($$arg{'tags'} and %{$$arg{'tags'};}) { } |
|
81
|
0 |
0 |
if (%{$$arg{'exact_tags'};}) { } |
|
82
|
0 |
0 |
defined $$arg{'exact_tags'}{$_} ? : |
|
92
|
0 |
13 |
defined $$arg{'tags'}{$_} ? : |
|
113
|
0 |
22 |
unless my $code = $self->can("arg_for_$param") |
|
131
|
0 |
8 |
unless $user |
|
188
|
0 |
0 |
$bool ? : |
|
199
|
0 |
0 |
$bool ? : |
|
210
|
0 |
0 |
$bool ? : |
|
222
|
0 |
1 |
unless $md5 =~ /\A[a-z0-9]{32}\Z/i |