Branch Coverage

lib/Pheno/Ranker/Compare.pm
Criterion Covered Total %
branch 91 130 70.0


line true false branch
25 2 11 exists $data->[0]{'subject'} ? :
38 0 14 if $self->{'debug'} or $self->{'verbose'}
61 0 14 $num_items > $max_items ? :
66 0 0 $switch ? :
0 14 if $self->{'debug'} or $self->{'verbose'}
80 0 420 if $self->{'verbose'}
93 0 15028 if ($switch) { }
99 0 0 $i == $j ? :
103 420 14608 if ($i == $j) { }
7304 7304 elsif ($j > $i) { }
131 0 14 if $self->{'debug'} or $self->{'verbose'}
149 0 2 if $self->{'debug'} or $self->{'verbose'}
170 0 72 if $self->{'verbose'}
172 0 72 if defined $self->{'debug'} and $self->{'debug'} > 1
210 1 1 $weight ? :
224 246 72 exists $nomenclature{$_} ? :
228 0 2 if @sort_keys_glob_hash != @labels
253 0 284 $sort_by eq 'jaccard' ? :
258 0 72 if $self->{'verbose'}
313 0 72 $target_vars == 0 ? :
315 0 72 $reference_vars == 0 ? :
353 936 360 if (defined $format->{$_}{'format'}) { }
357 72 0 if (defined $align)
395 36 36 $weight_bool eq 'True' ? :
406 2 70 if $count == $max_out
426 0 72 if $length1 != $length2
455 5164 6284 if $char1 == 0 and $char2 == 0
461 2112 9336 if $char1 ne $char2
463 9336 2112 $char1 eq $char2 ? :
508 0 456 unless my $id = $element->{$primary_key}
513 0 456 if $self->{'verbose'}
525 97 359 if defined $weight
567 0 458 if @included and @excluded
574 25 433 if (@included)
576 75 50 unless &any(sub { $_ eq $key; } , @included)
581 0 458 if (@excluded)
583 0 0 if exists $hash->{$key}
595 138 320 unless exists $hash->{'phenotypicFeatures'}
600 338 449 unless $feature->{'excluded'}
604 2 447 if ($switch) { }
607 0 2 $format eq 'BFF' ? :
648 0 458 unless %$hash
686 2799 84392 unless defined $hash->{$key}
693 50729 33663 if defined $exclude_variables_regex_qr and $key =~ /$exclude_variables_regex_qr/
700 1509 31774 if $format eq 'PXF' || $format eq 'BFF' and $key =~ /\.age(?!nt)|onset/i and not $self->{'age'}
711 7989 23564 if ref $val eq "HASH" and not keys %{$val;} or ref $val eq "ARRAY" and not @{$val;} or exists $exclude_values{$val} or $val =~ /$misc_regex_qr/
722 0 23564 if (defined $edges and $val =~ /^HP:/)
738 23564 0 if ($tmp_key_at_term_level =~ /\./)
745 5292 18272 if (defined $weight) { }
761 0 5247 exists $weight->{$tmp_key_at_term_level} ? :
45 5247 exists $weight->{$tmp_key_at_variable_level} ? :
782 23229 335 if defined $hash->{$label}
879 22358 1206 if ($key =~ /$array_terms_regex_qr/) { }
890 22228 130 if (defined $3) { }
894 0 22228 if (ref $id_correspondence->{$1} eq ref []) { }
930 0 1206 if $key =~ /^(\w+):/
955 22926 39344 $has_value ? :
956 13396 48874 if (defined $weight)
960 5134 8262 $has_value ? :
965 360 98 unless defined $weight
971 0 458 if (defined $export)
980 0 0 defined $weight ? :
1024 20 5057 if $hash_ref->{$key} == 0
1031 72 0 if ($input_string =~ /\. # Match a literal dot ([^\.]+) # Match and capture everything except a dot $ # Anchor to the end of the string /x)
1065 0 0 unless my $raw_data = uncompress($compressed_data)