Branch Coverage

lib/Sisimai/Lhost/Yandex.pm
Criterion Covered Total %
branch 31 38 81.5


line true false branch
26 260 16 unless $mhead->{'x-yandex-uniq'}
27 0 16 unless $mhead->{'from'} eq "mailer-daemon\@yandex.ru"
48 224 397 unless ($readcursor)
50 16 208 if index($e, $startingof->{'message'}[0]) == 0
53 0 397 unless $readcursor & $indicators->{'deliverystatus'}
54 90 307 unless length $e
56 153 154 if (my $f = 'Sisimai::RFC1894'->match($e)) { }
58 0 153 unless my $o = "Sisimai::RFC1894"->field($e)
61 42 111 if ($o->[-1] eq 'addr') { }
21 90 elsif ($o->[-1] eq 'code') { }
64 21 21 if ($o->[0] eq 'final-recipient') { }
66 5 16 if ($v->{'recipient'})
85 0 90 unless exists $$fieldtable{$o->[0]}
88 58 32 unless $f == 1
96 16 138 if ($e =~ /[ \t][(]in reply to .*([A-Z]{4}).*/) { }
0 138 elsif ($e =~ /([A-Z]{4})[ \t]*.*command[)]\z/) { }
106 133 5 unless index($p, "Diagnostic-Code:") == 0
107 0 5 unless $e =~ /\A[ \t]+(.+)\z/
115 0 16 unless $recipients