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/ |