| line |
true |
false |
branch |
|
41
|
4 |
385 |
unless $self->_HAS_KEY |
|
42
|
2 |
383 |
unless defined $key |
|
43
|
2 |
381 |
if $key eq "" |
|
44
|
2 |
379 |
if $key =~ /"/ |
|
45
|
2 |
377 |
if $key =~ /\n/ |
|
46
|
2 |
375 |
if $key =~ /\r/ |
|
54
|
6 |
1233 |
unless $self->_HAS_KEY |
|
55
|
4 |
1229 |
unless defined $self->{'key'} |
|
63
|
3 |
36 |
unless defined $value |
|
85
|
4 |
381 |
unless $self->_HAS_VALUE |
|
86
|
3 |
378 |
unless defined $value |
|
88
|
3 |
375 |
if $value =~ /"/ |
|
89
|
3 |
372 |
if $value =~ /\n/ |
|
90
|
3 |
369 |
if $value =~ /\r/ |
|
98
|
1 |
1576 |
unless $self->_HAS_VALUE |
|
99
|
59 |
1517 |
unless defined $self->{'value'} |
|
107
|
7 |
544 |
unless defined $string |
|
110
|
37 |
514 |
if ($strict_quotes and $string =~ m<[\s\t \(\);=<>\@,:\\/\[\]\?]> or not $strict_quotes and $string =~ /[\s\t \(\);=]/) |
|
121
|
2 |
3343 |
unless $self->_HAS_CHILDREN |
|
122
|
2007 |
1336 |
unless defined $self->{'children'} |
|
129
|
8 |
11 |
unless exists $self->{'parent'} |
|
139
|
1 |
0 |
if exists $entry->{'parent'} |
|
147
|
394 |
392 |
if ref $parent eq "Mail::AuthenticationResults::Header::Group" |
|
148
|
4 |
388 |
if exists $self->{'parent'} |
|
149
|
0 |
388 |
unless $parent->_ALLOWED_CHILDREN($self) |
|
165
|
0 |
16 |
unless $self->_HAS_CHILDREN |
|
166
|
0 |
16 |
unless $self->_ALLOWED_CHILDREN($child) |
|
167
|
0 |
16 |
if builtin::refaddr($self) == builtin::refaddr($child) |
|
173
|
16 |
23 |
if (builtin::refaddr($child) == builtin::refaddr($mychild)) { } |
|
174
|
10 |
6 |
if (ref $self ne "Mail::AuthenticationResults::Header::Group") |
|
185
|
0 |
16 |
unless $child_removed |
|
195
|
29 |
831 |
unless $self->_HAS_CHILDREN |
|
196
|
25 |
806 |
unless $self->_ALLOWED_CHILDREN($child) |
|
197
|
0 |
806 |
if builtin::refaddr($self) == builtin::refaddr($child) |
|
250
|
35 |
964 |
if defined $self->{'strict_quotes'} |
|
253
|
516 |
448 |
if $depth == 0 |
|
260
|
2 |
0 |
$value ? : |
|
271
|
292 |
0 |
if ($eldest->can("indent_by")) |
|
276
|
292 |
0 |
if ($eldest->can("eol")) |
|
282
|
292 |
0 |
if ($eldest->can("indent_on")) |
|
283
|
117 |
175 |
if ($eldest->indent_on(ref $self)) |
|
289
|
175 |
117 |
unless $added |
|
301
|
32 |
14 |
if $self->_HAS_KEY |
|
302
|
46 |
0 |
if $self->_HAS_VALUE |
|
303
|
34 |
12 |
if ($self->_HAS_CHILDREN) |
|
330
|
2 |
261 |
unless ($self->key) |
|
335
|
239 |
22 |
if ($self->value) { } |
|
|
2 |
20 |
elsif ($self->value eq '0') { } |
|
|
20 |
0 |
elsif ($self->value eq '') { } |
|
345
|
18 |
2 |
if ($self->key ne "none") |
|
350
|
261 |
0 |
if ($self->_HAS_CHILDREN) |
|
368
|
792 |
481 |
if (exists $search->{'key'}) |
|
369
|
574 |
218 |
if ($self->_HAS_KEY) { } |
|
370
|
1 |
573 |
if (ref $search->{'key'} eq 'Regexp' and $self->key =~ /$search->{'key'}/) { } |
|
|
84 |
489 |
elsif (lc $search->{'key'} eq lc $self->key) { } |
|
387
|
694 |
579 |
if (exists $search->{'value'}) |
|
388
|
0 |
694 |
unless defined $search->{'value'} |
|
389
|
675 |
19 |
if ($self->_HAS_VALUE) { } |
|
390
|
1 |
674 |
if (ref $search->{'value'} eq 'Regexp' and $self->value =~ /$search->{'value'}/) { } |
|
|
156 |
518 |
elsif (lc $search->{'value'} eq lc $self->value) { } |
|
406
|
87 |
1186 |
if (exists $search->{'authserv_id'}) |
|
407
|
82 |
5 |
if ($self->_HAS_VALUE) { } |
|
408
|
16 |
66 |
if (lc ref $self eq 'mail::authenticationresults::header') { } |
|
410
|
2 |
14 |
if (ref $search->{'authserv_id'} eq 'Regexp' and $authserv_id =~ /$search->{'authserv_id'}/) { } |
|
|
3 |
11 |
elsif (lc $search->{'authserv_id'} eq lc $authserv_id) { } |
|
430
|
447 |
826 |
if (exists $search->{'isa'}) |
|
431
|
134 |
313 |
if (lc ref $self eq 'mail::authenticationresults::header::' . lc($search->{'isa'})) { } |
|
|
5 |
308 |
elsif (lc ref $self eq 'mail::authenticationresults::header' and lc $search->{'isa'} eq 'header') { } |
|
442
|
33 |
1240 |
if (exists $search->{'has'}) |
|
444
|
23 |
15 |
if scalar @{$self->search($query)->children;} == 0 |
|
448
|
185 |
1088 |
if ($match) |
|
452
|
1031 |
242 |
if ($self->_HAS_CHILDREN) |
|
455
|
214 |
906 |
if (scalar @{$childfound->children;}) |