| line |
true |
false |
branch |
|
27
|
1 |
3 |
unless CORE::chmod $mode, $$self |
|
33
|
0 |
2 |
unless copy($$self, $to) |
|
34
|
1 |
1 |
-d $to ? : |
|
46
|
9 |
1 |
$tx ? : |
|
49
|
87 |
9 |
(shift())->basename =~ /.+\.([^.]+)$/u ? : |
|
56
|
2 |
29 |
unless -d $$self |
|
57
|
0 |
29 |
unless opendir my $dir, $$self |
|
58
|
221 |
29 |
if $_ ne "." |
|
59
|
27 |
2 |
unless $options->{'hidden'} |
|
61
|
27 |
2 |
unless $options->{'dir'} |
|
70
|
233 |
3 |
unless $options->{'hidden'} |
|
73
|
0 |
236 |
if $options->{'dont_use_nlink'} |
|
77
|
62 |
2814 |
if ($options->{'max_depth'}) |
|
79
|
29 |
33 |
if splitdir($rel) >= $options->{'max_depth'} |
|
81
|
2148 |
728 |
if $options->{'dir'} or not -d $File::Find::name |
|
83
|
227 |
9 |
if -d $$self |
|
99
|
0 |
10 |
unless move($$self, $to) |
|
100
|
1 |
9 |
-d $to ? : |
|
105
|
2 |
10651 |
if grep {not defined $_;} @_ |
|
106
|
3490 |
183 |
@_ > 1 ? : |
|
|
6978 |
3673 |
@_ == 1 ? : |
|
113
|
1 |
140 |
unless $handle->open($$self, @_) |
|
123
|
46 |
6 |
if -e $$self |
|
141
|
1 |
129 |
unless CORE::open my $file, "<", $$self |
|
144
|
0 |
129 |
unless defined $ret |
|
146
|
2 |
127 |
$encoding ? : |
|
151
|
1 |
54 |
if $encoding |
|
152
|
1 |
54 |
unless CORE::open my $file, ">", $$self |
|
153
|
1 |
52 |
unless ($file->syswrite($content) // -1) == length $content |
|
177
|
2 |
2 |
unless -e $$self |
|
178
|
0 |
4 |
unless utime undef, undef, $$self |
|
187
|
16 |
6 |
unless my $err = $tx->error |
|
188
|
3 |
3 |
if $err->{'message'} eq "Download complete" or $err->{'message'} eq "Download incomplete" |
|
189
|
1 |
2 |
if $err->{'code'} |