line |
true |
false |
branch |
47
|
0 |
4 |
unless defined $ext
|
48
|
0 |
4 |
unless defined $basename
|
50
|
4 |
0 |
$digits == 1 ? :
|
55
|
64 |
0 |
if ($basename and $ext) { }
|
61
|
0 |
64 |
unless my $index = 'Metabase::Index::SQLite'->new('filename', $index_file)
|
75
|
0 |
13 |
if (defined $key and length $key > 1) { }
|
|
13 |
0 |
elsif (defined $key and length $key == 1) { }
|
82
|
0 |
0 |
$digits == 1 ? :
|
99
|
0 |
8 |
unless my $shard = $self->_get_shard($key)
|
125
|
1 |
23 |
if $limit and $count == $limit
|
130
|
17 |
206 |
if (my(@items) = $s->items)
|
135
|
12 |
11 |
unless @results
|
138
|
3 |
8 |
if (my(@clauses) = $self->_order_clauses(\%spec))
|
142
|
1 |
10 |
if ($limit)
|
143
|
0 |
1 |
if ($count + @results <= $limit) { }
|
161
|
3 |
8 |
if (defined $$spec{-'order'} and ref $$spec{-'order'} eq 'ARRAY') { }
|
185
|
1 |
2 |
if ($dir eq 'ASC') { }
|
186
|
0 |
1 |
if $left gt $right
|
187
|
1 |
0 |
if $left lt $right
|
190
|
0 |
2 |
if $left gt $right
|
191
|
2 |
0 |
if $left lt $right
|