Branch Coverage

blib/lib/Bio/RNA/RNAaliSplit/WrapAnalyseDists.pm
Criterion Covered Total %
branch 0 54 0.0


line true false branch
64 0 0 unless $self->has_ifile
66 0 0 unless $analysedists = can_run('AnalyseDists')
68 0 0 unless ($self->has_odir)
69 0 0 unless ($self->has_odirn)
89 0 0 if ($self->has_basename) { }
104 0 0 unless ($success)
131 0 0 if $line =~ /^>\s+\D/
132 0 0 if ($line =~ /^>\s+(\d+)/)
133 0 0 if $count++ >= $num
136 0 0 unless $line =~ /^\s*(\d+)\s+(\d+)\s+(\-?\d+\.\d+)\s+(\-?\d+\.\d+)/g
142 0 0 if (exists $data{$j})
151 0 0 if (not exists $sets{$set1_key} || exists $sets{$set2_key}) { }
155 0 0 if scalar @set1 == '0'
156 0 0 if scalar @set2 == '0'
157 0 0 if (scalar @set1 == 1 or scalar @set2 == 1) { }
174 0 0 if ($self->has_basename) { }
182 0 0 unless ($success)
203 0 0 if $line =~ /^>\s+\D/
204 0 0 if ($line =~ /^>\s+(\d+)/)
205 0 0 if $line =~ /^\s*\d+\.\d+\s+\:\s+\{\s+\[Split prime fraction\]\s+\}/g
207 0 0 unless $line =~ /^\s*\d+\s+\d+\.\d+\s+:\s+\{\s+([\d+\s+]+)\|/g
213 0 0 unless grep {$i == $_;} @foo
219 0 0 if (not exists $sets{$set1_key} || exists $sets{$set2_key}) { }
223 0 0 if (scalar @set1 == 1 or scalar @set2 == 1) { }
237 0 0 unless open my $fh, '<', $self->ifile
239 0 0 if (/^>\s+X\s+(\d+)/)
241 0 0 if $dim == -1