Branch Coverage

blib/lib/Email/Simple/FromHandle.pm
Criterion Covered Total %
branch 13 20 65.0


line true false branch
71 0 16 unless $self->body_pos >= 0
73 2 14 unless seek $self->handle, 0, 1
84 1 15 unless $self->_is_seekable or $self->{'_seek'}++
88 1 14 unless seek $self->handle, $self->body_pos, 0
104 0 0 unless ($self->{'_get_head_lines'})
145 0 2 unless print {$fh;} @_
151 3 0 unless exists $arg->{'reset_handle'}
158 3 0 if $arg->{'reset_handle'}
173 0 6 unless ref $handle
201 6 117 if $mycrlf and /\A$mycrlf\z/