Condition Coverage

blib/lib/PDL/IO/Misc.pm
Criterion Covered Total %
condition 48 103 46.6


and 2 conditions

line l !l condition
693 1 29 defined $_ and scalar @{$_->[1];}

and 3 conditions

line !l l&&!r l&&r condition
443 4 4 3 defined $_[-1] and ref $_[-1] eq 'HASH'
454 10 0 12 $options->{$pattern} and ref $options->{$pattern} ne 'Regexp'
496 10 0 1 defined $x and $x ne ''
497 10 0 1 defined $y and $y ne ''
504 1 0 10 $index_start >= 0 and $index_end < 0
0 0 1 $index_end >= 0 and $index_start < 0
0 0 0 $index_end >= $index_start and $index_start >= 0
0 0 0 $index_start > $index_end and $index_end >= 0
565 50 0 0 defined $line_end and $line_num > $line_end
566 0 50 0 defined $line_start and $line_num < $line_start
567 5 38 7 $options->{'EXCLUDE'} and $fhline =~ /$options->{'EXCLUDE'}/
568 34 3 6 $options->{'INCLUDE'} and not $fhline =~ /$options->{'INCLUDE'}/
586 9 0 1 scalar @explicit_cols == 1 and ref $explicit_cols[0] eq 'ARRAY'
604 18 1 0 ref $col eq 'ARRAY' and not scalar @$col
624 1 18 0 ref $col ne 'ARRAY' and defined $is_perl_col[$col]
683 37 0 0 defined $line_end and $line_num == $line_end
718 1 0 9 $line_rev == 0 and $index_start >= 0
1 0 9 $line_rev == 0 and $index_start >= 0 and $index_end >= -1
739 0 1 0 defined $line_start and defined $line_end
910 0 0 4 !(UNIVERSAL::isa($file, 'PDL') || UNIVERSAL::isa($file, 'ARRAY')) && _is_io_handle($file)
966 12 0 0 @d and not $i
1047 0 0 0 @d and not $i
1148 1 0 0 $undef_is_bad and not $PDL::Bad::Status

or 2 conditions

line l !l condition
416 9 0 open $fh, $_[0] or die "File $_[0] not found\n"
498 0 11 $c || 1
1125 0 0 open $fh, $_[0] or die "File $_[0] not found\n"
1140 0 1 $_[1] || {}

or 3 conditions

line l !l&&r !l&&!r condition
245 7 0 9 defined fileno $h || defined $reftype && $reftype eq 'GLOB'
465 0 11 0 $options->{'CHUNKSIZE'} || $defchunksize
901 2 1 1 ref \$_[0] eq 'SCALAR' or $format_string
920 0 0 0 $file =~ /^\|/ or $file =~ /^\>/
940 0 0 8 $_->dim(0) != $n or $_->getndims > 2
1032 0 0 0 $_->nelem != $n or $_->getndims != 1
1332 0 0 3 not defined $file or ref $file
1387 0 0 0 $im->getdim(0) != $nx or $im->getdim(1) != $ny