Condition Coverage

blib/lib/IO/All/File.pm
Criterion Covered Total %
condition 7 15 46.6


and 3 conditions

line !l l&&!r l&&r condition
18 20 304 9 @_ and @_ > 1
88 0 0 0 defined $self->_handle and not $self->io_handle->opened

or 2 conditions

line l !l condition
181 1 1 shift() || 10
201 0 0 shift() || 10
205 0 0 $self->getline_backwards || (last)

or 3 conditions

line l !l&&r !l&&!r condition
63 1 0 5 $self->tied_file || do { eval { do { require Tie::File } }; $self->throw("Tie::File required for file array operations:\n$@") if $@; my $array_ref = do { my @array; \@array }; my $name = $self->pathname; my(@options) = $self->_rdonly ? ('mode', 0) : (); push @options, ('recsep', $self->separator); tie @$array_ref, 'Tie::File', $name, @options; $self->throw("Can't tie 'Tie::File' to '${name}':\n$!") unless tied @$array_ref; $self->tied_file($array_ref) }