Branch Coverage

blib/lib/Mail/SpamAssassin/AutoWhitelist.pm
Criterion Covered Total %
branch 29 64 45.3


line true false branch
73 3 7 if ($main->{'pers_addr_list_factory'}) { }
78 7 0 if ($type =~ /^([_A-Za-z0-9:]+)$/) { }
85 0 7 unless (eval "\n \t require " . $type . ";\n \$factory = " . $type . "->new();\n 1;\n ")
86 0 0 $@ ne '' ? :
90 7 0 if $factory
97 0 10 if (not defined $factory) { }
121 0 10 unless (defined $self->{'checker'})
131 7 3 unless ($entry->{'msgcount'})
133 1 6 if (defined $origip)
138 0 1 if (defined $noipent->{'msgcount'} and $noipent->{'msgcount'} > 0)
150 0 10 if ($entry->{'msgcount'} < 0 or $entry->{'msgcount'} != $entry->{'msgcount'} or $entry->{'totscore'} != $entry->{'totscore'})
159 7 3 !$entry->{'msgcount'} ? :
190 0 8 unless (defined $self->{'checker'})
193 0 8 if ($score != $score)
246 0 0 unless (defined $self->{'checker'})
259 0 0 unless (defined $score)
260 0 0 if ($score != $score)
274 0 10 unless defined $self->{'checker'}
285 0 1 if (not defined $origip) { }
1 0 elsif ($origip =~ /^ (\d{1,3} \. \d{1,3}) \. \d{1,3} \. \d{1,3} $/sx) { }
0 0 elsif ($origip =~ /:/ and $origip =~ /^ [0-9a-f]{0,4} (?: : [0-9a-f]{0,4} | \. [0-9]{1,3} ){2,9} $/six) { }
289 0 1 unless defined $mask_len
291 0 1 if ($mask_len == 32) { }
1 0 elsif ($mask_len == 16) { }
297 0 0 if (not defined $origip_obj) { }
309 0 0 unless defined $mask_len
311 0 0 if (not defined $origip_obj) { }
0 0 elsif ('NetAddr::IP'->can('full6')) { }
320 0 1 if (defined $result and length $result > 39)
323 1 0 if (defined $result)
337 1 10 if (defined $origip)
340 10 1 unless (defined $origip)