| line |
true |
false |
branch |
|
31
|
12 |
50 |
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 |
48 |
if ($header =~ /^Authentication-Results:/i) |
|
113
|
1192 |
60 |
exists $args->{'last_non_comment_type'} ? : |
|
115
|
2 |
1250 |
if (length $header == 0) { } |
|
|
73 |
1177 |
elsif ($header =~ /^\(/) { } |
|
|
132 |
1045 |
elsif ($header =~ /^;/) { } |
|
|
38 |
1007 |
elsif ($header =~ /^"/) { } |
|
|
83 |
924 |
elsif ($last_non_comment_type ne 'assignment' and $header =~ /^\./) { } |
|
|
4 |
920 |
elsif ($last_non_comment_type eq 'assignment' and $header =~ /^\./) { } |
|
|
4 |
916 |
elsif ($last_non_comment_type ne 'assignment' and $header =~ m[^/]) { } |
|
|
2 |
914 |
elsif ($last_non_comment_type eq 'assignment' and $header =~ m[^/]) { } |
|
|
269 |
645 |
elsif ($header =~ /^=/) { } |
|
160
|
2 |
56 |
unless @tokenised |
|
177
|
55 |
2 |
if ($token->is eq 'string') { } |
|
|
1 |
1 |
elsif ($token->is eq 'comment') { } |
|
197
|
7 |
62 |
if ($token->is eq 'assignment') { } |
|
|
3 |
59 |
elsif ($token->is eq 'comment') { } |
|
|
48 |
11 |
elsif ($token->is eq 'separator') { } |
|
198
|
4 |
3 |
if ($expecting eq 'assignment') { } |
|
199
|
2 |
2 |
if ($token->value eq '=') { } |
|
216
|
11 |
5 |
if ($token->is eq "string") |
|
217
|
9 |
2 |
if ($expecting eq 'key') { } |
|
|
1 |
1 |
elsif ($expecting eq 'value') { } |
|
232
|
4 |
45 |
if ($expecting ne "key") |
|
233
|
2 |
2 |
if ($key->value =~ /^[0-9]+$/) { } |
|
262
|
339 |
742 |
if ($token->is eq 'assignment') { } |
|
|
69 |
673 |
elsif ($token->is eq 'comment') { } |
|
|
72 |
601 |
elsif ($token->is eq 'separator') { } |
|
263
|
338 |
1 |
if ($expecting eq 'assignment') { } |
|
264
|
257 |
81 |
if ($token->value eq '=') { } |
|
|
79 |
2 |
elsif ($token->value eq '.') { } |
|
|
2 |
0 |
elsif ($token->value eq '/') { } |
|
284
|
601 |
407 |
if ($token->is eq "string") |
|
285
|
268 |
333 |
if ($expecting eq 'key') { } |
|
|
79 |
254 |
elsif ($expecting eq 'keymod') { } |
|
|
2 |
252 |
elsif ($expecting eq 'version') { } |
|
|
250 |
2 |
elsif ($expecting eq 'value') { } |
|
286
|
114 |
154 |
if (not $is_subentry) { } |
|
287
|
7 |
107 |
if ($token->value eq 'none') { } |
|
306
|
1 |
1 |
if ($token->value =~ /^[0-9]+$/) { } |
|
316
|
100 |
150 |
if (not $is_subentry) { } |
|
332
|
5 |
105 |
if ($expecting eq "no_more_after_none") |
|
342
|
9 |
96 |
if ($expecting ne "key") |
|
343
|
4 |
5 |
if ($is_subentry) |