line |
true |
false |
branch |
44
|
2 |
1 |
if (@{$args;} != 2) |
51
|
0 |
1 |
if lc $_ eq 'stdin' |
52
|
1 |
0 |
unless (Path::Tiny::path($_)->is_file) |
57
|
0 |
0 |
unless (exists $opt->{'outfile'}) |
62
|
0 |
0 |
if (not IPC::Cmd::can_run('samtools')) |
71
|
0 |
0 |
if (lc $args->[0] eq 'stdin') { } |
79
|
0 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |
92
|
0 |
0 |
if ($line =~ /^\>[\w:-]+/) { } |
|
0 |
0 |
elsif ($line =~ /^[\w-]+/) { } |
95
|
0 |
0 |
if (defined $header) |
132
|
0 |
0 |
if ($name and $name ne $info->{'name'}) |
136
|
0 |
0 |
if ($info->{'strand'} eq '-') |
141
|
0 |
0 |
if ($info->{'end'} and $info->{'start'} < $info->{'end'}) { } |
150
|
0 |
0 |
if ($seq eq $seq_in_genome) |
169
|
0 |
0 |
if ($line =~ /^[\w-]+/) |