line |
true |
false |
branch |
29
|
11 |
48 |
if ($auth_header) |
62
|
13 |
46 |
if ($header =~ /^Authentication-Results:/i) |
72
|
1112 |
58 |
exists $args->{'last_non_comment_type'} ? : |
74
|
2 |
1168 |
if (length $header == 0) { } |
|
67 |
1101 |
elsif ($header =~ /^\(/) { } |
|
123 |
978 |
elsif ($header =~ /^;/) { } |
|
38 |
940 |
elsif ($header =~ /^"/) { } |
|
77 |
863 |
elsif ($last_non_comment_type ne 'assignment' and $header =~ /^\./) { } |
|
4 |
859 |
elsif ($last_non_comment_type eq 'assignment' and $header =~ /^\./) { } |
|
5 |
854 |
elsif ($header =~ m[^/]) { } |
|
251 |
603 |
elsif ($header =~ /^=/) { } |
114
|
2 |
55 |
unless @tokenised |
131
|
54 |
2 |
if ($token->is eq 'string') { } |
|
1 |
1 |
elsif ($token->is eq 'comment') { } |
151
|
7 |
61 |
if ($token->is eq 'assignment') { } |
|
3 |
58 |
elsif ($token->is eq 'comment') { } |
|
47 |
11 |
elsif ($token->is eq 'separator') { } |
152
|
4 |
3 |
if ($expecting eq 'assignment') { } |
153
|
2 |
2 |
if ($token->value eq '=') { } |
170
|
11 |
5 |
if ($token->is eq "string") |
171
|
9 |
2 |
if ($expecting eq 'key') { } |
|
1 |
1 |
elsif ($expecting eq 'value') { } |
186
|
4 |
44 |
if ($expecting ne "key") |
187
|
2 |
2 |
if ($key->value =~ /^[0-9]+$/) { } |
216
|
316 |
686 |
if ($token->is eq 'assignment') { } |
|
63 |
623 |
elsif ($token->is eq 'comment') { } |
|
64 |
559 |
elsif ($token->is eq 'separator') { } |
217
|
314 |
2 |
if ($expecting eq 'assignment') { } |
218
|
238 |
76 |
if ($token->value eq '=') { } |
|
74 |
2 |
elsif ($token->value eq '.') { } |
|
2 |
0 |
elsif ($token->value eq '/') { } |
238
|
559 |
377 |
if ($token->is eq "string") |
239
|
250 |
309 |
if ($expecting eq 'key') { } |
|
73 |
236 |
elsif ($expecting eq 'keymod') { } |
|
2 |
234 |
elsif ($expecting eq 'version') { } |
|
232 |
2 |
elsif ($expecting eq 'value') { } |
240
|
105 |
145 |
if (not $is_subentry) { } |
241
|
7 |
98 |
if ($token->value eq 'none') { } |
260
|
1 |
1 |
if ($token->value =~ /^[0-9]+$/) { } |
270
|
90 |
142 |
if (not $is_subentry) { } |
286
|
5 |
95 |
if ($expecting eq "no_more_after_none") |
296
|
8 |
87 |
if ($expecting ne "key") |
297
|
3 |
5 |
if ($is_subentry) |