line |
true |
false |
branch |
37
|
0 |
1 |
unless (@{$args;}) |
41
|
0 |
1 |
if lc $_ eq 'stdin' |
42
|
0 |
1 |
unless (Path::Tiny::path($_)->is_file) |
47
|
0 |
1 |
if (not exists $opt->{'outfile'}) |
67
|
0 |
16 |
unless exists $info_of->{$part} |
72
|
0 |
8 |
unless @parts == 2 |
84
|
2 |
6 |
if (@strands != 1) |
99
|
14 |
2 |
unless ($graph->has_vertex($range)) |
101
|
0 |
14 |
if $opt->{'verbose'} |
106
|
8 |
0 |
if (not $graph->has_edge($range_0, $range_1)) { } |
111
|
0 |
8 |
if $opt->{'verbose'} |
114
|
0 |
8 |
if $opt->{'verbose'} |
117
|
0 |
0 |
if $opt->{'verbose'} |
121
|
0 |
1 |
if $opt->{'verbose'} |
132
|
0 |
6 |
if $copy == 1 |
148
|
0 |
6 |
if $opt->{'verbose'} |
173
|
0 |
8 |
unless $graph->has_edge($ranges[$i], $ranges[$j]) |
175
|
0 |
8 |
unless $graph->has_edge_attribute($ranges[$i], $ranges[$j], 'strand') |
177
|
0 |
8 |
unless defined $infos[$i]{'strand'} |
183
|
2 |
6 |
if ($hit_strand eq '-') { } |
185
|
0 |
2 |
if $opt->{'verbose'} |
186
|
2 |
0 |
if ($infos[$i]{'strand'} eq '+') { } |
206
|
0 |
8 |
if ($diff_ratio < $opt->{'ratio'}) { } |
209
|
0 |
0 |
if $opt->{'verbose'} |
213
|
0 |
0 |
if $opt->{'verbose'} |
239
|
0 |
6 |
if $copy == 1 |
253
|
1 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |