| line |
true |
false |
branch |
|
39
|
0 |
1 |
unless (@{$args;}) |
|
43
|
0 |
1 |
if lc $_ eq 'stdin' |
|
44
|
0 |
1 |
unless (Path::Tiny::path($_)->is_file) |
|
49
|
0 |
1 |
if (not exists $opt->{'outfile'}) |
|
69
|
0 |
16 |
unless exists $info_of->{$part} |
|
74
|
0 |
8 |
unless @parts == 2 |
|
86
|
2 |
6 |
if (@strands != 1) |
|
101
|
14 |
2 |
unless ($graph->has_vertex($range)) |
|
103
|
0 |
14 |
if $opt->{'verbose'} |
|
108
|
8 |
0 |
if (not $graph->has_edge($range_0, $range_1)) { } |
|
113
|
0 |
8 |
if $opt->{'verbose'} |
|
116
|
0 |
8 |
if $opt->{'verbose'} |
|
119
|
0 |
0 |
if $opt->{'verbose'} |
|
123
|
0 |
1 |
if $opt->{'verbose'} |
|
134
|
0 |
6 |
if $copy == 1 |
|
150
|
0 |
6 |
if $opt->{'verbose'} |
|
175
|
0 |
8 |
unless $graph->has_edge($ranges[$i], $ranges[$j]) |
|
177
|
0 |
8 |
unless $graph->has_edge_attribute($ranges[$i], $ranges[$j], 'strand') |
|
179
|
0 |
8 |
unless defined $infos[$i]{'strand'} |
|
185
|
2 |
6 |
if ($hit_strand eq '-') { } |
|
187
|
0 |
2 |
if $opt->{'verbose'} |
|
188
|
2 |
0 |
if ($infos[$i]{'strand'} eq '+') { } |
|
208
|
0 |
8 |
if ($diff_ratio < $opt->{'ratio'}) { } |
|
211
|
0 |
0 |
if $opt->{'verbose'} |
|
215
|
0 |
0 |
if $opt->{'verbose'} |
|
241
|
0 |
6 |
if $copy == 1 |
|
255
|
1 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |