Branch Coverage

blib/lib/Email/Simple/FromHandle.pm

Criterion	Covered	Total	%
branch	13	20	65.0

line	true	false	branch
29	0	16	unless $self->body_pos >= 0
31	2	14	unless seek $self->handle, 0, 1
42	1	15	unless $self->_is_seekable or $$self{'_seek'}++
46	1	14	unless seek $self->handle, $self->body_pos, 0
53	0	0	unless ($$self{'_get_head_lines'})
66	0	2	unless print {$fh;} @_
72	3	0	unless exists $$arg{'reset_handle'}
79	3	0	if $$arg{'reset_handle'}
94	0	6	unless ref $handle
122	6	117	if $mycrlf and /\A$mycrlf\z/