Branch Coverage

lib/Sanger/CGP/TraFiC/Cluster.pm
Criterion Covered Total %
branch 23 32 71.8


line true false branch
53 0 2 unless defined which('sort')
77 0 3 unless (exists $$neg{$family})
83 1 2 unless (exists $$neg{$family}{$chr})
114 0 1 unless system($sort_command) == 0
147 1 1 if ($$neg_hits[$neg_i]{'l_pos'} < $$pos{'r_pos'})
151 0 1 if ($$neg_hits[$neg_i]{'r_pos'} + 200 < $$pos{'l_pos'})
156 0 1 if ($$neg_hits[$neg_i]{'l_pos'} - 200 > $$pos{'r_pos'})
172 2 8 if substr($cluster, 0, 1) eq '#'
201 86288 96472 if $fam eq 'Alu' and $class ne 'INTER_CHROM' and $$self{'paired_alu'} == 1
203 10356 102400 if ($p_chr eq $chr and $p_fam eq $fam and $pos - $p_pos <= 200) { }
220 56 102352 if (scalar @{$cluster;} >= $$self{'min_reads'})
246 65 105 if (defined $reads and @{$reads;} > 0)
260 2 0 if defined $paired_alu
266 0 1 unless -e $root_path
267 0 1 unless -d $root_path
268 0 1 unless -w $root_path