Branch Coverage

blib/lib/Bio/SDRS.pm
Criterion Covered Total %
branch 92 148 62.1


line true false branch
162 0 14 if ($class ne $pkg)
190 0 14 exists $ENV{'TMPDIR'} ? :
192 0 14 if (exists $ENV{'USER'})
208 6 8 if (not $$self{'DEBUG'} and $$self{'TMP_CREATED'} and $$self{'STATE'} eq 'calculated')
287 0 112 unless $type
288 0 112 unless $type =~ /^$pkg$/
292 0 112 if (not exists $component{$name}) { }
0 112 elsif (not exists $$self{$name}) { }
112 0 elsif (defined $_[0]) { }
302 0 112 if ($name eq 'MULTIPLE' and $$self{'MULTIPLE'} <= 1)
306 0 112 if ($name eq 'LDOSE' and $$self{'LDOSE'} <= 0)
310 0 112 if ($name eq 'HDOSE' and $$self{'HDOSE'} <= $$self{'LDOSE'})
314 0 112 if ($name eq 'STEP' and $$self{'STEP'} <= 0)
318 0 14 if ($name eq 'MAXPROC' and $$self{'MAXPROC'} > 64 || $$self{'MAXPROC'} < 1)
322 0 14 if ($name eq 'TRIM' and $$self{'TRIM'} < 0 || $$self{'TRIM'} > 1)
327 0 14 if ($name eq 'SIGNIFICANCE' and $$self{'SIGNIFICANCE'} <= 0 || $$self{'SIGNIFICANCE'} >= 1)
345 0 14 if (scalar @_ == 0) { }
353 0 125 if ($dose < $dose1)
377 0 275 if (exists $$self{'RESPONSES'}{$assay})
381 0 275 if (scalar @{$$self{'DOSES'};} == 0)
386 0 275 if ($nresp != $ndoses)
410 0 14 if $$self{'STATE'} eq 'calculated'
439 0 275 if $count >= $assayNum
447 36 8 if ($pid = fork) { }
8 0 elsif (defined $pid) { }
448 0 36 if $$self{'DEBUG'}
454 0 8 unless open ECOUT, ">$file"
465 9840 1144 if ($dose - $last_dose > $$self{'STEP'})
468 2746 8238 if ($icount++ % $$self{'MAXPROC'} == $iproc)
483 0 24 if ($? != 0)
499 0 24 unless open IN, "<$infile"
506 207323 0 if (defined $expressedAssays{$assay})
518 0 745135 unless $fs{$b} <=> $fs{$a}
521 0 207323 if ($fs{$assay} < 0) { }
546 111 40 if ($max >= $$self{'CUTOFF'}) { }
554 0 151 if ($max <= 0) { }
563 11 140 if ($d >= 0) { }
564 10 1 if ($a != 0) { }
570 140 0 if ($a != 0) { }
624 0 6865 if ($$self{'STATE'} ne 'calculated')
628 0 6865 if (not defined $dose) { }
632 0 6865 if (not exists $$self{'SORTED_DATA'}{$dose}) { }
653 0 6865 if ($$self{'STATE'} ne 'calculated')
657 0 6865 if (not defined $dose) { }
661 0 6865 if (not exists $$self{'PVAL_DATA'}{$dose}) { }
706 1812 0 unless defined $precision
707 0 1812 if ($$self{'STATE'} ne 'calculated')
710 0 1812 if (not defined $assay) { }
714 0 1812 unless (exists $$self{'EC50DATA'}{$assay})
719 0 1812 if (not defined $property) { }
723 0 1812 if (not exists $$assaydata{$property}) { }
729 1394 418 if ($ret ne '' and $ret != int $ret)
740 0 14 if (-d $$self{'TMPDIR'} and -w $$self{'TMPDIR'})
743 0 14 if (-d $$self{'TMPDIR'})
746 0 14 if (-w $$self{'TMPDIR'})
747 0 0 unless unlink $$self{'TMPDIR'}
766 111 152292 if $dose == $ec50
767 99063 53340 if ($current >= $$self{'CUTOFF'}) { }
769 111 98952 if $off_flag == 1
771 55 53285 if ($seen == 1)
776 55 53285 if ($off_flag == 0)
782 56 55 if $seen == 1
783 56 55 if $current >= $$self{'CUTOFF'}
792 111 0 if (@$range >= 2) { }
816 0 42563 if ($best_sse == 0 or $n == 0) { }
856 68 482 if $stdev eq 'NaN' or $stdev < $cutoff
860 5 545 if ($step == 0)
864 275 275 if ($pam eq 'a') { }
275 0 elsif ($pam eq 'b') { }
867 32 243 if $l <= 0
874 131 144 if $l <= 0
897 0 20 if (defined $echo and $echo)
901 0 20 if ($status != 0)
912 0 0 if (substr($mesg, -1, 1) ne "\n")