| line |
true |
false |
branch |
|
29
|
54 |
0 |
if ($ref eq ref $new_config) { }
|
|
30
|
21 |
33 |
if ($ref eq 'ARRAY') { }
|
|
|
23 |
10 |
elsif ($ref eq 'HASH') { }
|
|
36
|
25 |
4 |
unless $old{$item}
|
|
44
|
32 |
11 |
if (exists $old_config->{$name}) { }
|
|
73
|
0 |
22 |
if $@
|
|
88
|
0 |
3 |
if $@
|
|
102
|
1 |
93 |
if (@lines)
|
|
107
|
1 |
92 |
if (ref $block ne 'HASH')
|
|
122
|
1 |
7 |
if $blockname
|
|
159
|
9 |
51 |
unless defined $level
|
|
164
|
5 |
55 |
if ($type eq 'ARRAY') { }
|
|
|
12 |
43 |
elsif ($type eq 'HASH') { }
|
|
|
1 |
42 |
elsif (length $value > 60) { }
|
|
168
|
0 |
13 |
if ($subtype) { }
|
|
182
|
9 |
29 |
if ($subtype) { }
|
|
210
|
6 |
60 |
unless defined $name
|
|
211
|
6 |
60 |
unless defined $level
|
|
218
|
4 |
62 |
if ($type eq 'ARRAY') { }
|
|
|
14 |
48 |
elsif ($type eq 'HASH') { }
|
|
228
|
8 |
6 |
if length $name
|
|
229
|
8 |
6 |
if length $name
|
|
235
|
8 |
6 |
if length $name
|
|
239
|
48 |
0 |
length $name ? :
|
|
258
|
12 |
295 |
unless defined $indent
|
|
260
|
107 |
188 |
unless (defined $first_indent)
|
|
265
|
228 |
67 |
if ($indent == $first_indent) { }
|
|
|
40 |
27 |
elsif ($indent > $first_indent) { }
|
|
|
27 |
0 |
elsif ($indent < $first_indent) { }
|
|
268
|
1 |
227 |
if ($type ne $first_type)
|
|
273
|
51 |
176 |
if ($type eq 'ARRAY') { }
|
|
|
169 |
7 |
elsif ($type eq 'HASH') { }
|
|
282
|
1 |
39 |
if ($first_type ne 'ARRAY' and $first_type ne 'HASH')
|
|
288
|
1 |
38 |
if (length $block[-1])
|
|
304
|
29 |
102 |
if (not defined $first_type) { }
|
|
|
29 |
73 |
elsif ($first_type eq 'ARRAY') { }
|
|
|
71 |
2 |
elsif ($first_type eq 'HASH') { }
|
|
327
|
92 |
200 |
if not $token =~ /\S/ or $token =~ /^<\?/
|
|
329
|
69 |
131 |
if ($token =~ m[^<\s*/\s*([^\s>]+)]) { }
|
|
|
70 |
61 |
elsif ($token =~ /^<\s*([^\s>]+)/) { }
|
|
331
|
0 |
69 |
unless defined $value
|
|
337
|
1 |
67 |
if $starting_tagname ne $ending_tagname
|
|
339
|
18 |
49 |
unless defined $value
|
|
340
|
1 |
66 |
unless ref $value eq 'HASH'
|
|
342
|
10 |
56 |
if (exists $value->{$starting_tagname}) { }
|
|
345
|
5 |
5 |
if (ref $old_value eq 'ARRAY') { }
|
|
356
|
1 |
60 |
if defined $value
|
|
361
|
0 |
7 |
unless defined $value
|
|
375
|
296 |
12 |
if (not $line =~ /^\s*#/ and $line =~ /\S/)
|
|
377
|
11 |
285 |
if ($line =~ /^(\s*)> (.*)/) { }
|
|
|
80 |
205 |
elsif ($line =~ /^(\s*)- (.*)/) { }
|
|
|
204 |
1 |
elsif ($line =~ /^(\s*)(\S+): (.*)/) { }
|
|
391
|
295 |
0 |
defined $spaces ? :
|
|
404
|
0 |
11 |
unless $App::Followme::NestedText::a->[0] cmp $App::Followme::NestedText::b->[0]
|
|
415
|
1 |
361 |
unless defined $str
|