| line |
true |
false |
branch |
|
23
|
0 |
42 |
unless my $file = $self->file
|
|
38
|
0 |
0 |
unless my $from = $self->from
|
|
63
|
156 |
312 |
unless my $item = $self->item($name)
|
|
72
|
0 |
1580 |
unless my $items = $self->list($name)
|
|
73
|
1580 |
0 |
if $seek
|
|
83
|
312 |
8054 |
if not $item->{'list'} and $item->{'name'} eq $name
|
|
94
|
0 |
42 |
unless open my $fh, '<', $file
|
|
104
|
0 |
1658 |
unless $name
|
|
109
|
16387 |
65985 |
if $item->{'list'} and $item->{'list'} eq $name
|
|
118
|
0 |
0 |
unless my $items = $self->list($list)
|
|
136
|
0 |
1632 |
unless $meta and $data
|
|
137
|
42 |
1590 |
unless $meta ne 'cut'
|
|
140
|
1248 |
342 |
@info == 2 ? :
|
|
155
|
0 |
0 |
unless $name
|
|
156
|
0 |
0 |
if not $type or $type ne 'item' and $type ne 'list'
|
|
163
|
0 |
0 |
if $type eq 'list' and $item->{'list'} and $item->{'list'} eq $name
|
|
164
|
0 |
0 |
if $type eq 'item' and $item->{'name'} and $item->{'name'} eq $name
|
|
166
|
0 |
0 |
if $matched
|
|
167
|
0 |
0 |
unless $matched
|
|
172
|
0 |
0 |
$type eq 'name' ? :
|