line |
true |
false |
branch |
38
|
111 |
4 |
if ($status > 0) |
45
|
98 |
237 |
if (/\G\s+/cg) |
46
|
51 |
284 |
if (/\G\[:(\w+)\|(.*?)\|\]/cg) { } |
|
16 |
268 |
elsif (/\G\[:(\w+)\|(.*)/cg) { } |
|
16 |
252 |
elsif (/\G\|\]/cg) { } |
|
157 |
95 |
elsif (/\G[^\|\[]+|\G./cg) { } |
52
|
0 |
51 |
if (defined $$self{'method'}) |
58
|
40 |
11 |
if ($self->can($meth)) |
75
|
4 |
12 |
unless ($self->can($meth)) |
88
|
12 |
0 |
if (not defined $$self{'method'}) { } |
101
|
4 |
12 |
if ($$self{'ignore_once'}) |
102
|
0 |
4 |
if $$self{'method'} |
110
|
0 |
12 |
unless (defined $meth) |
118
|
0 |
12 |
if (not $pos) { } |
139
|
6 |
105 |
if (not $changed and defined $$self{'method'}) |
145
|
52 |
63 |
if $changed |
147
|
115 |
0 |
unless substr($_, -1, 1) eq "\n" |
154
|
0 |
407 |
if $Debug |