Branch Coverage

blib/lib/IO/Handle/Iterator.pm
Criterion Covered Total %
branch 13 20 65.0


line true false branch
25 9 0 if (my $cb = $self->{'cb'})
26 8 1 if (defined(my $next = &$cb())) { }
71 0 0 if @args
102 6 7 if length $self->{'buf'} == 0
123 0 6 if $self->eof
125 1 5 if ($offset and length $_[1] < $offset)
130 6 1 if (defined(my $next = $self->_cb)) { }
137 1 0 if ($offset) { }
148 0 5 if ($length > length $self->{'buf'}) { }
154 0 5 if ($offset) { }