Branch Coverage

blib/lib/Data/MATFile.pm
Criterion Covered Total %
branch 62 180 34.4


line true false branch
127 4 1 if ($ok)
153 0 1 if ($obj->{'verbose'})
161 0 1 if ($v != 256)
165 0 1 if ($obj->{'verbose'})
183 0 1 unless ($file_name)
186 0 1 unless (-f $file_name)
210 0 1 if ($obj->{'verbose'})
238 0 1 unless ($obj->{'fh'})
258 1 0 if ($e eq 'MI') { }
0 0 elsif ($e eq 'IM') { }
268 0 1 if ($obj->{'verbose'})
293 0 5 if wantarray != 0
295 1 4 if ($obj->{'eof'})
298 0 4 if ($type == 15) { }
4 0 elsif ($type == 14) { }
313 0 0 unless (defined $name)
324 0 4 if ($obj->{'verbose'})
353 4 0 if ($numeric) { }
0 0 elsif ($class == 2) { }
0 0 elsif ($class == 1) { }
0 0 elsif ($class == 4) { }
361 0 0 unless ($name)
374 0 0 if ($obj->{'verbose'})
386 0 4 unless (defined $matrix->{'array'})
405 0 0 unless ($data)
424 0 0 if wantarray != 0
447 0 4 if ($type != 6)
450 0 4 if ($n_bytes != 8)
457 0 4 if ($obj->{'verbose'})
458 0 0 if ($complex) { }
465 0 4 if ($complex)
469 0 4 if ($class > 15)
472 0 4 if ($obj->{'verbose'})
489 0 0 if ($obj->{'verbose'})
493 0 0 if ($type != 5)
496 0 0 if ($n_bytes != 4)
499 0 0 unless (defined $data)
503 0 0 if ($obj->{'verbose'})
507 0 0 if ($type != 1)
511 0 0 if ($n_names != int $n_names)
519 0 0 if ($obj->{'verbose'})
540 0 0 if ($class == 6 or $class == 7 or $class == 8 or $class == 9 or $class == 10 or $class == 11 or $class == 12 or $class == 13)
550 0 4 if ($obj->{'verbose'})
551 0 0 if ($numeric) { }
577 4 0 if ($type == 9) { }
578 0 4 if ($class != 6)
584 0 0 unless ($data)
587 0 0 if ($type == 1) { }
0 0 elsif ($type == 2) { }
0 0 elsif ($type == 3) { }
0 0 elsif ($type == 4) { }
0 0 elsif ($type == 5) { }
0 0 elsif ($type == 6) { }
634 0 4 if (scalar @$numbers != $n)
641 4 0 if (@$dim == 2) { }
713 0 4 if ($n_bytes % 8 != 0)
721 0 22 if ($obj->{'verbose'})
754 0 22 if ($bottom == 0) { }
0 22 elsif ($top == 2146435072) { }
755 0 0 if ($top == 0) { }
0 0 elsif ($top == 2147483648) { }
0 0 elsif ($top == 2146435072) { }
0 0 elsif ($top == 4293918720) { }
796 0 4 if ($obj->{'verbose'})
800 0 4 if ($type != 1)
804 0 4 if ($n_bytes == 0)
807 4 0 unless ($data)
812 0 4 if ($obj->{'verbose'})
830 0 4 unless wantarray
833 0 4 if ($type != 5)
838 0 4 if ($obj->{'verbose'})
855 0 21 if ($obj->{'verbose'})
859 1 20 if ($obj->{'eof'})
885 0 20 if ($obj->{'verbose'})
888 0 20 if (length $h != 8)
896 0 20 if ($sdef)
898 0 0 if ($obj->{'verbose'})
907 0 20 if ($type > 18)
910 0 20 if ($obj->{'verbose'})
935 0 40 if ($obj->{'eof'})
938 0 40 if ($obj->{'verbose'})
939 0 0 if ($no_pad)
945 4 36 if (not $no_pad and $n % 8 != 0)
952 0 40 if ($obj->{'input_data'}) { }
955 0 0 if ($nbytes > $has)
964 0 40 unless (defined $nread)
967 1 39 if ($nread == 0) { }
0 39 elsif ($nread != $nbytes) { }
975 4 36 if ($padded)
976 0 4 if ($obj->{'verbose'})