Condition Coverage

blib/lib/Mail/Field/Received.pm
Criterion Covered Total %
condition 57 87 65.5


and 3 conditions

line !l l&&!r l&&r condition
328 11 14 0 $expecting{'from'} and /\G$Mail::Field::Received::RC{'from1'}/cg
344 11 12 2 $expecting{'from'} and /\G$Mail::Field::Received::RC{'from2'}/cg
359 21 2 0 $expecting{'after_from'} and /\G($Mail::Field::Received::RC{'domain_lit'})/cg
366 21 2 0 $expecting{'after_from'} and $parsed{'from'}{'whole'} eq 'from mail'
23 0 0 $expecting{'after_from'} and $parsed{'from'}{'whole'} eq 'from mail' and /\G(pickup service)/cg
376 21 2 0 $expecting{'after_from'} and $parsed{'whole'} =~ /Microsoft SMTPSVC/
23 0 0 $expecting{'after_from'} and $parsed{'whole'} =~ /Microsoft SMTPSVC/ and /\G-\s+$Mail::Field::Received::RC{'ipv4_addr'}/cg
384 21 2 0 $expecting{'after_from'} and /\G, claiming to be ($Mail::Field::Received::RC{'word'})/cg
392 14 7 2 $expecting{'by'} and /\G$Mail::Field::Received::RC{'by'},?/cg
405 19 2 0 $expecting{'after_by'} and /\G($Mail::Field::Received::RC{'domain_lit'})/cg
412 19 2 0 $expecting{'after_by'} and /\G(Sendmail)/cg
424 10 11 0 $expecting{'via'} and /\G$Mail::Field::Received::RC{'via'}/cg
437 21 0 0 $expecting{'after_via'} and /\G\[$Mail::Field::Received::RC{'ipv4_addr'}\]/cg
444 12 9 0 not $expecting{'from'} and /\Gfrom\s+stdin/cg
450 10 11 0 $expecting{'with'} and m[ \G((?i:with) \s (P:(stdio|smtp)/R:(inet|bind)_hosts/T:(smtp|inet_zone_bind_smtp))) ]cgx
469 10 9 2 $expecting{'with'} and /\G$Mail::Field::Received::RC{'with'}/cg
485 17 0 2 $expecting{'after_with'} and $parsed{'with'}{'with'}
509 2 0 0 $parsed{'with'}{'with'} eq 'Internet' and /\GMail Service\s*\(([\d\.]+)\)/cg
517 2 0 0 $parsed{'with'}{'with'} eq 'WorldClient' and /\G($Mail::Field::Received::RC{'domain_lit'})/cg
525 2 0 0 $parsed{'with'}{'with'} eq 'Local' and /\GSMTP/cg
535 5 12 2 $expecting{'id'} and /\G$Mail::Field::Received::RC{'id'}/cg
548 7 10 0 $expecting{'convert'} and /\G$Mail::Field::Received::RC{'convert'}/cg
559 7 9 1 $expecting{'for'} and /\G$Mail::Field::Received::RC{'for'}(\s+bugtraq\@securityfocus\.com)?/cig
573 5 11 0 $expecting{'sent_by'} and /\G$Mail::Field::Received::RC{'sent_by'}/cg
585 5 6 5 $expecting{'date_time'} and /\G((?:on\s+)?$Mail::Field::Received::RC{'date_time'})/cg
629 6 5 0 $expecting{'after_date_time'} and /\G((mail.from|env.from).+)/cg
658 5 0 1 $parsed{'parse_failed'} && !$parsed{'allow_parse_fail'}

or 2 conditions

line l !l condition
111 1 0 $$self{'Diags'} || ''
329 0 0 $_ || '__undef__'
641 5 1 pos $_ || 0