Branch Coverage

lib/Haineko/SMTPD/Milter/Example.pm
Criterion Covered Total %
branch 21 28 75.0


line true false branch
14 1 2 if ($remotehost eq 'localhost.localdomain') { }
1 1 elsif ($remoteaddr eq '255.255.255.255') { }
27 2 1 $nekor->error ? :
35 1 1 if ($argvs =~ /[.]local\z/)
42 1 1 $nekor->error ? :
53 0 2 if (grep {$argvs =~ /[.]$_\z/;} @$invalidtld) { }
1 1 elsif (grep {$argvs eq $_;} @$spamsender) { }
64 1 1 $nekor->error ? :
73 1 0 unless grep {$bccto eq $_;} @$argvs
74 0 1 $nekor->error ? :
82 1 0 if (exists $$argvs{'subject'} and $$argvs{'subject'} =~ /spam/i)
89 1 0 $nekor->error ? :
97 1 0 if ($$argvs =~ m[https?://])
103 1 0 $nekor->error ? :