Branch Coverage

blib/lib/Log/Procmail.pm
Criterion Covered Total %
branch 45 52 86.5


line true false branch
40 6 90 if $fh->eof
49 50 164 if (/^From (.+?) +($DATE)$/o)
57 1 49 if @{$log->{'buffer'};} > 1
62 49 115 if (/^ Subject: (.*)/i)
64 1 48 unless @{$log->{'buffer'};}
72 50 65 if (/^ Folder: (.*?)\s+(\d+)$/)
74 0 50 unless @{$log->{'buffer'};}
84 27 38 unless $log->{'errors'}
93 7 38 if (not $read or @{$log->{'buffer'};} == 0)
96 0 7 if @{$log->{'buffer'};}
99 4 3 if $log->_open_next
108 51 38 if (UNIVERSAL::isa($rec, "Log::Procmail::Abstract"))
110 1 50 unless defined $rec->folder
124 4 2 @_ ? :
129 9 86 unless $log->{'fh'}->opened
146 13 3 if (@{$log->{'files'};}) { }
150 1 12 if (ref $file eq 'GLOB') { }
1 11 elsif (ref $file and $file->isa('IO::Handle')) { }
152 0 1 unless $log->{'fh'}->opened
158 0 11 unless $log->{'fh'}->open($file)
163 0 13 grep(($^O eq $_), ('MSWin32', 'NetWare', 'dos', 'VMS', 'riscos', 'beos')) ? :
169 9 1 if ($self->{'fh'} and $self->{'fh'}->opened)
188 252 156 @_ ? :
194 0 3 if @_
196 0 3 unless defined $self->{'date'}
198 1 2 unless $1