Branch Coverage

blib/lib/IO/ReadHandle/Include.pm
Criterion Covered Total %
branch 0 94 0.0


line true false branch
236 0 0 if ref $_[0]
266 0 0 if (defined $field) { }
294 0 0 if (defined $ms and (&reftype($ms) // '') eq '')
299 0 0 if ($ifh)
342 0 0 unless defined $source
343 0 0 if (ref $source)
344 0 0 if (&reftype($source) eq 'GLOB')
346 0 0 defined $s ? :
371 0 0 if $buffer
374 0 0 if $ifh and not $ifh->eof
380 0 0 if ($ifh) { }
382 0 0 unless ($self->_end_include)
392 0 0 if (ref $source and &reftype($source) eq 'GLOB') { }
396 0 0 unless CORE::open $ifh, '<', $source
424 0 0 if (@_ >= 3) { }
425 0 0 unless ($href)
432 0 0 unless $href
461 0 0 if (wantarray) { }
469 0 0 if $self->EOF
476 0 0 if $self->EOF
479 0 0 if ($line =~ $self->_get('include'))
483 0 0 unless $path
485 0 0 if ($coderef)
489 0 0 if ($path->is_relative)
497 0 0 if (&none(sub { $_ eq $path; } , @{$sources;}))
498 0 0 if (CORE::open my $newifh, '<', "$path")
549 0 0 if (@args == 1 and ref $args[0] and &reftype($args[0]) eq 'HASH') { }
557 0 0 if ref $source ne '' and &reftype($source) ne 'GLOB'
560 0 0 if not $regex or &reftype($regex) ne 'REGEXP'
563 0 0 if $coderef and &reftype($coderef) ne 'CODE'
577 0 0 if ($ifh)
579 0 0 if (@$ifhs)
597 0 0 if ($buffer)
600 0 0 if ($line =~ m[$/$])
605 0 0 unless (CORE::eof $ifh)
645 0 0 if ($offset < 0)
647 0 0 if ($offset < 0)
653 0 0 if ($offset < $l) { }
0 0 elsif ($offset > $l) { }
664 0 0 if ($self->EOF)
678 0 0 if ($self->_get('read_by_line')) { }
698 0 0 if ($n > $length)
724 0 0 if ($href)
762 0 0 if ($position == 0) { }
763 0 0 if ($whence != 1)
792 0 0 unless ($href)
836 0 0 unless ref $coderef eq 'CODE'