| line |
true |
false |
branch |
|
44
|
1 |
4 |
if (@{$args;} != 1) |
|
51
|
0 |
4 |
if lc $_ eq 'stdin' |
|
52
|
1 |
3 |
unless (Path::Tiny::path($_)->is_file) |
|
57
|
0 |
3 |
if (not exists $opt->{'outfile'}) |
|
67
|
0 |
3 |
if (lc $args->[0] eq 'stdin') { } |
|
75
|
3 |
0 |
if (lc $opt->{'outfile'} eq 'stdout') { } |
|
93
|
3 |
81 |
if $in_fh->eof and $content eq '' |
|
95
|
81 |
0 |
unless ($in_fh->eof) |
|
98
|
0 |
81 |
if substr($line, 0, 1) eq '#' |
|
100
|
9 |
72 |
if ($line eq '' || $line =~ /^\s+$/ and $content ne '') { } |
|
112
|
9 |
0 |
if ($opt->{'length'}) |
|
113
|
1 |
8 |
if length $$info_of{$full_names[0]}{'seq'} < $opt->{'length'} |
|
118
|
3 |
5 |
if ($opt->{'outgroup'}) |