Condition Coverage

blib/lib/Mail/Audit.pm
Criterion Covered Total %
condition 31 91 34.0


and 3 conditions

line !l l&&!r l&&r condition
80 2 0 7 $$log{'file'} and open $output_fh, '>>', $$log{'file'}
178 5 0 1 exists $$local_opts{$opt} && $$local_opts{$opt} || $$self{'_audit_opts'}{$opt} and grep {index($_, '%') >= 0;} @out
197 4 0 2 defined $user and defined $rest
263 3 0 0 exists $$local_opts{'noexit'} and $$local_opts{'noexit'}
363 0 4 0 not $$write_opts{'need_from'} and $self->head->header->[0] =~ /^From\s/
370 4 0 0 $$write_opts{'need_from'} and not $self->head->header->[0] =~ /^From\s/
448 0 0 2 @lines == 1 and ref $lines[0] eq 'ARRAY'
587 0 0 0 exists $$local_opts{'noexit'} and $$local_opts{'noexit'}
619 0 0 0 exists $$local_opts{'noexit'} and $$local_opts{'noexit'}
640 2 0 1 exists $$local_opts{'noexit'} and $$local_opts{'noexit'}
666 0 0 0 defined $reply_opts{'even_if_from_daemon'} and $reply_opts{'even_if_from_daemon'}
775 13 0 32 defined $string && length $string

or 2 conditions

line l !l condition
49 13 10 $opt || {}
121 0 9 $$self{'_audit_opts'}{'noexit'} ||= 0
122 0 9 $$self{'_audit_opts'}{'interpolate_strftime'} ||= 0
123 0 9 $$self{'_audit_opts'}{'one_for_all'} ||= 0
345 4 0 shift() || {}
379 0 0 $self->get('Return-path') || $self->get('Sender') || $self->get('Reply-To') || 'root@localhost'
725 0 0 $reply_opts{'x-loop'} || $self->get('X-Loop') || '1'
726 0 0 $self->get('X-Loop-Detect') || '1'

or 3 conditions

line l !l&&r !l&&!r condition
58 0 9 0 ref $class || $class
60 0 9 0 delete $opts{'mime_test'} || $default_mime_test
102 0 1 8 $opts{'alwaysmime'} or &$mime_test($self)
154 0 0 0 (-d 'File::Spec'->catdir($default_maildir, 'new') ? $default_maildir : ()) || (grep {-d $_;} '/var/spool/mail/', '/var/mail/')[0] . getpwuid($>)
178 1 0 5 exists $$local_opts{$opt} && $$local_opts{$opt} || $$self{'_audit_opts'}{$opt}
263 0 2 1 exists $$local_opts{'noexit'} and $$local_opts{'noexit'} or $$self{'_audit_opts'}{'noexit'}
587 0 0 0 exists $$local_opts{'noexit'} and $$local_opts{'noexit'} or $$self{'_audit_opts'}{'noexit'}
619 0 0 0 exists $$local_opts{'noexit'} and $$local_opts{'noexit'} or $$self{'_audit_opts'}{'noexit'}
640 1 1 1 exists $$local_opts{'noexit'} and $$local_opts{'noexit'} or $$self{'_audit_opts'}{'noexit'}
650 0 0 0 $self->get('Resent-From') || $self->get('Reply-To') || $self->get('From') || $self->get('Sender') || $self->get('Return-Path')
674 0 0 0 length $self->get('X-Loop') or length $self->get('X-Loop-Detect')
682 0 0 0 $reply_opts{'to'} || $self->_reply_recipient
686 0 0 0 $reply_opts{'subject'} || (defined $self->subject && length $self->subject ? !($self->subject =~ /\bRe:/i) ? 'Re: ' . $self->subject : $self->subject : 'your mail')