Branch Coverage

blib/lib/Log/Accounting/Sendmail.pm
Criterion Covered Total %
branch 14 24 58.3


line true false branch
43 0 0 if (not ref $fh and ref \$fh ne 'GLOB')
51 0 0 unless defined $read
80 2 5 if (/sm-mta\[\d+\]\: (.+)\: from=(.+), size=(\d+), class=-?\d+, (?:pri=\d+, )?nrcpts=(\d+), msgid/) { }
3 2 elsif (/sm-mta\[\d+\]\: (.+)\: to=(.+?), /) { }
87 2 0 if ($from ne '')
101 3 0 if (defined $MSGFROM{$id})
125 0 2 if ref $$self{'filter'} eq 'ARRAY' and not grep(($MSGFROM{$sid} =~ /^$_$/i), @{$$self{'filter'};}) and not grep(($MSGTO{$id} =~ /^$_$/i), @{$$self{'filter'};})
128 0 3 if (grep(($MSGTO{$id} =~ /^$_$/i), keys %revmap))
132 2 1 if (grep(($MSGFROM{$sid} =~ /^$_$/i), keys %revmap))
136 2 1 if (ref $$self{'group'} eq 'ARRAY' and grep(($fromkey =~ /^$_$/i), @{$$self{'group'};}) or grep(($tokey =~ /^$_$/i), @{$$self{'group'};})) { }
140 0 2 if (@key = grep(($tokey =~ /^$_$/i), @{$$self{'group'};}))
146 2 0 if (@key = grep(($fromkey =~ /^$_$/), @{$$self{'group'};}))