| 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'};}) { } |
|
84
|
0 |
0 |
defined $arg->{'exact_tags'}{$_} ? : |
|
94
|
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 |