| line |
true |
false |
branch |
|
38
|
22 |
10 |
unless $user |
|
56
|
6 |
41 |
if grep {not defined $_;} @constraints |
|
59
|
32 |
15 |
if exists $$context{'user'} |
|
63
|
0 |
47 |
if $$context{'order_by'} or '' =~ /\A(?:created|modified)\Z/ |
|
82
|
1 |
58 |
unless my $code = $self->can("constraint_for_$param") |
|
96
|
0 |
47 |
unless @$constraints |
|
119
|
1 |
12 |
unless $user |
|
139
|
2 |
18 |
unless $tags and ref $tags eq 'HASH' |
|
141
|
2 |
16 |
unless %$tags |
|
147
|
0 |
16 |
defined $tag_value ? : |
|
159
|
0 |
1 |
unless $tags and ref $tags eq 'HASH' |
|
209
|
1 |
1 |
$bool ? : |
|
220
|
1 |
1 |
$bool ? : |
|
232
|
10 |
0 |
$bool ? : |
|
247
|
1 |
3 |
unless my($link) = 'Rubric::Link'->search({'md5', $md5}) |
|
277
|
1 |
3 |
unless my(@unit) = $datetime =~ qr/^(\d{4})(?:-(\d{2})(?:-(\d{2})(?:(?:T|)(\d{2})(?::(\d{2}))?)?)?)?$/o |
|
279
|
2 |
1 |
if $unit[1] |
|
291
|
1 |
3 |
unless my(@time) = _unit_from_string($datetime) |
|
296
|
1 |
1 |
$prep eq 'before' ? : |
|
|
1 |
2 |
$prep eq 'after' ? : |