| line |
true |
false |
branch |
|
64
|
14 |
0 |
if ($self->removeEmpty) |
|
89
|
13 |
7 |
if (ref $thingy) { } |
|
98
|
6 |
14 |
-d $dir ? : |
|
99
|
9 |
11 |
unless opendir my $dh, $real |
|
116
|
34 |
14 |
if (-f $entry) { } |
|
|
14 |
0 |
elsif (-d _) { } |
|
117
|
1 |
33 |
if $args{'skip_empty'} and not -s _ |
|
118
|
1 |
32 |
if $args{'check'} and not $class->foundIn($entry) |
|
123
|
3 |
11 |
if ($args{'skip_empty'}) |
|
124
|
0 |
3 |
unless opendir my $dh, $entry |
|
127
|
1 |
2 |
unless @sub |
|
147
|
49 |
0 |
ref $thingy ? : |
|
153
|
54 |
34 |
if $real eq "" |
|
155
|
79 |
9 |
if (@parts) |
|
157
|
147 |
3 |
-d $real ? : |
|
158
|
62 |
17 |
-d $real ? : |
|
167
|
20 |
1 |
@_ % 2 ? : |
|
169
|
0 |
21 |
unless $name ||= $args{'folder'} |
|
175
|
7 |
14 |
if (-d $filename) |
|
177
|
2 |
5 |
if -d catdir($filename, "new") |
|
178
|
5 |
0 |
if (opendir my $dir, $filename) |
|
180
|
4 |
1 |
if @f and not grep(/\D/, @f) |
|
184
|
1 |
0 |
if -f "$filename/.mh_sequences" |
|
190
|
1 |
13 |
unless -f $filename |
|
191
|
1 |
12 |
if -z $filename |
|
193
|
0 |
12 |
unless open my $file, "<:raw", $filename |
|
196
|
0 |
12 |
if /^\s*$/ |