Branch Coverage

lib/Sisimai/Lhost/IMailServer.pm
Criterion Covered Total %
branch 21 26 80.7


line true false branch
21 25 181 if $mhead->{'subject'} =~ /\AUndeliverable Mail[ ]*\z/
22 25 181 if defined $mhead->{'x-mailer'} and index($mhead->{'x-mailer'}, "
23 181 25 unless $match
57 21 60 if ($e =~ /\A([^ ]+)[ ](.+)[:][ \t]*([^ ]+[\@][^ ]+)/) { }
4 56 elsif ($e =~ /\Aundeliverable[ ]+to[ ]+(.+)\z/) { }
59 0 21 if ($v->{'recipient'})
70 0 4 if ($v->{'recipient'})
81 20 36 if $v->{'alterrors'}
82 4 52 if index($e, $startingof->{'error'}[0]) > -1
85 0 25 unless $recipients
88 4 0 if (exists $e->{'alterrors'} and $e->{'alterrors'})
98 125 0 unless $e->{'diagnosis'} =~ /$recommands->{$r}/
105 54 21 unless $e->{'diagnosis'} =~ /$refailures->{$r}/