| line |
true |
false |
branch |
|
64
|
0 |
0 |
unless -d $dir |
|
73
|
0 |
0 |
unless $line =~ /^([TSPBJU])([? ]) ([rd>]) ([^\t]+)\t(.+)$/ |
|
76
|
0 |
0 |
length $4 > $plen && substr($4, 0, $plen) eq $prefix ? : |
|
78
|
0 |
0 |
$5 eq '???' ? : |
|
|
0 |
0 |
$5 eq '???' ? : |
|
88
|
0 |
0 |
-d "$dir/{arch}" ? : |
|
122
|
0 |
0 |
if @path == 1 |
|
130
|
0 |
0 |
@path ? : |
|
138
|
0 |
0 |
unless $_[0]{'path'} |
|
150
|
0 |
0 |
if (@_) { } |
|
152
|
0 |
0 |
if $_[0]{'type'} eq '>' |
|
168
|
0 |
0 |
if ($$root{'type'} eq 'd') |
|
180
|
0 |
0 |
if $dumper->can('Sortkeys') |
|
192
|
0 |
0 |
$$entry{'untagged'} ? : |
|
|
0 |
0 |
$$entry{'id'} ? : |
|
210
|
0 |
0 |
if $name =~ m[/] |
|
214
|
0 |
0 |
unless $$child{'type'} eq 'd' |
|
221
|
0 |
0 |
if (length $entries[$i]{'path'} > $plen and substr($entries[$i]{'path'}, 0, $plen) eq $prefix) { } |