Branch Coverage

blib/lib/Math/Matrix/MaybeGSL.pm
Criterion Covered Total %
branch 24 62 38.7


line true false branch
19 0 1 if $INC{'Math/GSL/Matrix.pm'}
20 0 1 if $INC{'Math/MatrixReal.pm'}
24 0 1 if eval { do { require Math::GSL; require Math::GSL::Matrix; 1 } }
31 1 0 if eval { do { require Math::MatrixReal; 1 } }
73 0 0 if (wantarray) { }
81 0 0 if (wantarray) { }
127 0 1 if $rs == 1 or $cs == 1
133 4 0 if (not $v or $v < $$m[$i - 1][$j - 1])
141 1 0 wantarray ? :
147 0 1 if $rs == 1 or $cs == 1
153 1 3 if (not $v or $v > $$m[$i - 1][$j - 1])
161 1 0 wantarray ? :
170 0 0 if @$row > $nr_rows
187 0 0 if @$col > $nr_columns
212 1 2 if ref $argument eq "Math::Matrix::MaybeGSL"
213 3 0 if ref $object eq "Math::Matrix::MaybeGSL"
215 1 2 if (defined $flag and $flag) { }
231 1 0 if ref $object eq "Math::Matrix::MaybeGSL"
232 1 0 if ref $argument eq "Math::Matrix::MaybeGSL"
242 0 1 unless open my $fh, ">", $filename
251 2 2 unless $c == $cols - 1
263 0 1 unless open my $fh, "<", $filename
281 4 2 unless $_
291 0 0 unless -f $filename
294 0 0 unless $fh
298 0 0 if $err
304 0 0 if $err
316 0 0 unless $fh
325 0 0 if $err
330 0 0 if $err
344 0 0 if Math::GSL::Matrix::gsl_matrix_get($raw_matrix, $i, $j)