Branch Coverage

Bio/SearchIO/Writer/TextResultWriter.pm
Criterion Covered Total %
branch 59 124 47.5


line true false branch
137 0 1 if ($@)
168 0 1 if (defined $filters)
169 0 0 if (!ref($filters) =~ /HASH/i) { }
178 0 1 if (not $Bio::SearchIO::Writer::TextResultWriter::TextWrapLoaded) { }
205 0 1 unless defined $result
210 0 1 if defined $resultfilter and not &{$resultfilter;}($result)
215 0 1 $result->algorithm_version =~ /WashU/ ? :
218 1 0 if ($alg =~ /T(FAST|BLAST)([XY])/i) { }
0 0 elsif ($alg =~ /T(FAST|BLAST)N/i) { }
0 0 elsif ($alg =~ /(FAST|BLAST)N/i or $alg =~ /(WABA|EXONERATE)/i) { }
0 0 elsif ($alg =~ /(FAST|BLAST)P/ or $alg =~ /SSEARCH|(HMM|SEARCH|PFAM)/i) { }
0 0 elsif ($alg =~ /(FAST|BLAST)[XY]/i) { }
243 1 0 $dbtype eq 'translated' ? :
1 0 $qtype eq 'translated' ? :
247 1 0 if (not defined $num or $num <= 1)
262 1 0 if ($result->can('rewind'))
266 0 20 if defined $hitfilter and not &{$hitfilter;}($hit)
268 0 20 unless $nm
274 20 0 if (length($desc) - 3 > $Bio::SearchIO::Writer::TextResultWriter::MaxDescLen) { }
281 0 0 defined $hit->raw_score ? :
0 0 defined $hit->significance ? :
20 0 defined $hit->bits ? :
20 0 defined $hit->significance ? :
0 20 $wublast ? :
290 20 0 if (@hsps)
291 20 0 defined $hit->description ? :
298 0 21 if defined $hspfilter and not &{$hspfilter;}($hsp)
301 0 21 if ($hsp->pvalue)
312 21 0 if ($type eq 'PROTEIN')
320 0 21 if ($hsp->gaps)
334 21 0 if ($hstrand or $qstrand)
337 0 21 if (not $hstrand) { }
342 5 16 $hstrand < 0 ? :
344 0 21 if (not $qstrand) { }
348 7 14 $qstrand < 0 ? :
353 0 21 if (defined $hframe and not defined $qframe) { }
0 21 elsif (defined $qframe and not defined $hframe) { }
364 0 21 if ($links and $hsp->can('links') and defined(my $lnks = $hsp->links))
370 14 7 $qstrand >= 0 ? :
14 7 $qstrand >= 0 ? :
16 5 $hstrand >= 0 ? :
16 5 $hstrand >= 0 ? :
416 42 21 if (defined $v->{'start'})
422 42 0 if (length $piece < $Bio::SearchIO::Writer::TextResultWriter::AlignmentLineWidth)
459 0 1 if (defined(my $open = $result->get_parameter('gapopen')))
476 18 8 if ($v =~ /^\d+$/)
479 1 25 if (defined $expect and $stat eq 'seqs_better_than_cutoff') { }
513 0 1 if ($code)
553 0 1 if ($code)
601 0 1 if ($code)
682 0 20 if ($code)
705 0 20 if ($string =~ s/gi\|(\d+)\|?//)
708 20 0 if ($string =~ /(\w+)\|([A-Z\d\.\_]+)(\|[A-Z\d\_]+)?/) { }
709 20 0 defined $2 ? :
718 0 0 $a <=> $b ? :
719 0 0 $a <=> $b ? :
736 0 0 unless defined $result and ref $result and $result->isa('Bio::Search::Result::ResultI')
738 0 0 if ($result->algorithm =~ /BLAST/i) { }
0 0 elsif ($result->algorithm =~ /FAST/i) { }
740 0 0 if ($result->algorithm_version =~ /WashU/i) { }
772 1 0 if ($Bio::SearchIO::Writer::TextResultWriter::TextWrapLoaded) { }
808 1 1 if @_