| line |
true |
false |
branch |
|
17
|
0 |
20 |
ref $_[0] eq 'HASH' ? : |
|
27
|
11 |
49 |
if length $line == 0 |
|
35
|
25 |
24 |
if ($ix != $prior_ix) { } |
|
|
12 |
12 |
elsif ($st) { } |
|
|
9 |
3 |
elsif ($he) { } |
|
37
|
0 |
5 |
$prior_he ? : |
|
|
5 |
20 |
if length $blob |
|
48
|
10 |
15 |
if ($st) { } |
|
|
10 |
5 |
elsif ($he) { } |
|
51
|
6 |
4 |
if ($info) { } |
|
55
|
4 |
0 |
if length $blob |
|
64
|
10 |
0 |
if length $blob |
|
75
|
0 |
12 |
if length $blob |
|
77
|
12 |
0 |
if (length $blob) |
|
89
|
0 |
9 |
if length $blob |
|
91
|
9 |
0 |
if (length $blob) |
|
103
|
1 |
2 |
if length $blob |
|
111
|
0 |
2 |
$prior_he ? : |
|
|
2 |
18 |
if length $blob |
|
128
|
35 |
7 |
if ($$b{-'style'} eq 'h') { } |
|
131
|
22 |
13 |
if ($$b{-'status'}) |
|
148
|
35 |
21 |
if $line =~ /^(\s+)\S/msx |
|
168
|
0 |
49 |
unless $line =~ m(\s* # Skip leading space
(.+?) # The blob we want
\s* # Possible trailing space
(\.\.\. # Maybe ellipsis
.*? # Maybe anything else, like prog/over
(\s\[\S+\])? # with [STAT]
)?$ # to end of line
)msx |
|
183
|
6 |
41 |
if ($$b{-'indent'} == $ix) |
|
184
|
6 |
0 |
if $$b{-'text'} eq $blob |
|
204
|
25 |
32 |
$line =~ /\s\[(\S+)\]$/msx ? : |