| line |
true |
false |
branch |
|
31
|
12 |
49 |
if ($auth_header) |
|
64
|
6 |
0 |
$type eq 'comment' ? : |
|
|
8 |
6 |
$type eq 'subentry' ? : |
|
|
8 |
14 |
$type eq 'entry' ? : |
|
|
1 |
22 |
$type eq 'authservid' ? : |
|
|
1 |
23 |
$type eq 'header' ? : |
|
72
|
1 |
23 |
if ($type eq 'header') { } |
|
77
|
16 |
7 |
if exists $hashref->{'key'} |
|
78
|
23 |
0 |
if exists $hashref->{'value'} |
|
81
|
18 |
6 |
if (exists $hashref->{'children'}) |
|
103
|
13 |
47 |
if ($header =~ /^Authentication-Results:/i) |
|
113
|
1185 |
59 |
exists $args->{'last_non_comment_type'} ? : |
|
115
|
2 |
1242 |
if (length $header == 0) { } |
|
|
73 |
1169 |
elsif ($header =~ /^\(/) { } |
|
|
131 |
1038 |
elsif ($header =~ /^;/) { } |
|
|
38 |
1000 |
elsif ($header =~ /^"/) { } |
|
|
83 |
917 |
elsif ($last_non_comment_type ne 'assignment' and $header =~ /^\./) { } |
|
|
4 |
913 |
elsif ($last_non_comment_type eq 'assignment' and $header =~ /^\./) { } |
|
|
5 |
908 |
elsif ($header =~ m[^/]) { } |
|
|
267 |
641 |
elsif ($header =~ /^=/) { } |
|
155
|
2 |
56 |
unless @tokenised |
|
172
|
55 |
2 |
if ($token->is eq 'string') { } |
|
|
1 |
1 |
elsif ($token->is eq 'comment') { } |
|
192
|
7 |
62 |
if ($token->is eq 'assignment') { } |
|
|
3 |
59 |
elsif ($token->is eq 'comment') { } |
|
|
48 |
11 |
elsif ($token->is eq 'separator') { } |
|
193
|
4 |
3 |
if ($expecting eq 'assignment') { } |
|
194
|
2 |
2 |
if ($token->value eq '=') { } |
|
211
|
11 |
5 |
if ($token->is eq "string") |
|
212
|
9 |
2 |
if ($expecting eq 'key') { } |
|
|
1 |
1 |
elsif ($expecting eq 'value') { } |
|
227
|
4 |
45 |
if ($expecting ne "key") |
|
228
|
2 |
2 |
if ($key->value =~ /^[0-9]+$/) { } |
|
257
|
338 |
736 |
if ($token->is eq 'assignment') { } |
|
|
69 |
667 |
elsif ($token->is eq 'comment') { } |
|
|
71 |
596 |
elsif ($token->is eq 'separator') { } |
|
258
|
336 |
2 |
if ($expecting eq 'assignment') { } |
|
259
|
254 |
82 |
if ($token->value eq '=') { } |
|
|
80 |
2 |
elsif ($token->value eq '.') { } |
|
|
2 |
0 |
elsif ($token->value eq '/') { } |
|
279
|
596 |
405 |
if ($token->is eq "string") |
|
280
|
266 |
330 |
if ($expecting eq 'key') { } |
|
|
79 |
251 |
elsif ($expecting eq 'keymod') { } |
|
|
2 |
249 |
elsif ($expecting eq 'version') { } |
|
|
247 |
2 |
elsif ($expecting eq 'value') { } |
|
281
|
113 |
153 |
if (not $is_subentry) { } |
|
282
|
7 |
106 |
if ($token->value eq 'none') { } |
|
301
|
1 |
1 |
if ($token->value =~ /^[0-9]+$/) { } |
|
311
|
98 |
149 |
if (not $is_subentry) { } |
|
327
|
5 |
103 |
if ($expecting eq "no_more_after_none") |
|
337
|
9 |
94 |
if ($expecting ne "key") |
|
338
|
4 |
5 |
if ($is_subentry) |