| line |
true |
false |
branch |
|
42
|
0 |
7 |
defined $arg{'debug'} ? : |
|
66
|
0 |
7 |
if 'Net::MirrorDir' ne ref $self |
|
79
|
0 |
1 |
if $self->IsConnection |
|
82
|
1 |
0 |
unless $Net::MirrorDir::_connection = 'Net::FTP'->new($$self{'_ftpserver'}, 'Debug', $$self{'_debug'}, 'Timeout', $$self{'_timeout'}) |
|
87
|
0 |
0 |
if ($Net::MirrorDir::_connection->login($$self{'_user'}, $$self{'_pass'})) { } |
|
95
|
0 |
0 |
if $$self{'_debug'} |
|
110
|
0 |
1 |
if $self->IsConnection |
|
119
|
0 |
11 |
unless -d $dir |
|
125
|
53 |
77 |
if (-f $p) { } |
|
|
77 |
0 |
elsif (-d $p) { } |
|
127
|
14 |
39 |
unless (@{$$self{'_regex_subset'};}) |
|
134
|
26 |
31 |
if ($p =~ /$_/) |
|
145
|
0 |
77 |
unless opendir PATH, $p |
|
146
|
220 |
77 |
if $_ ne '.' |
|
150
|
24 |
119 |
if grep {$file =~ /$_/;} @{$$self{'_regex_exclusions'};} |
|
158
|
0 |
11 |
unless opendir PATH, $dir |
|
159
|
22 |
11 |
if $_ ne '.' |
|
163
|
0 |
11 |
if grep {$file =~ /$_/;} @{$$self{'_regex_exclusions'};} |
|
173
|
0 |
0 |
unless eval {
do {
$Net::MirrorDir::_connection->cwd($dir)
}
} |
|
174
|
0 |
0 |
unless $Net::MirrorDir::_connection->cwd |
|
184
|
0 |
0 |
unless $Net::MirrorDir::_connection->abort |
|
186
|
0 |
0 |
if ($$self{'_debug'}) |
|
195
|
0 |
0 |
if $name eq '.' or $name eq '..' |
|
197
|
0 |
0 |
if grep {$np =~ /$_/;} @{$$self{'_regex_exclusions'};} |
|
198
|
0 |
0 |
if ($line =~ /^-/) { } |
|
|
0 |
0 |
elsif ($line =~ /^d/) { } |
|
201
|
0 |
0 |
unless @{$$self{'_regex_subset'};} |
|
204
|
0 |
0 |
if ($np =~ /$_/) |
|
235
|
4 |
24 |
unless defined $$rh_rp{$rp} |
|
249
|
4 |
24 |
unless defined $$rh_lp{$lp} |
|
258
|
24 |
27 |
if ($Net::MirrorDir::AUTOLOAD =~ /.*::(?i:get)_*(\w+)/) { } |
|
|
20 |
7 |
elsif ($Net::MirrorDir::AUTOLOAD =~ /.*::(?i:set)_*(\w+)/) { } |
|
|
6 |
1 |
elsif ($Net::MirrorDir::AUTOLOAD =~ /.*::(?i:add)_*(\w+)/) { } |
|
262
|
21 |
3 |
if (exists $$self{$attr}) { } |
|
279
|
19 |
1 |
if (exists $$self{$attr}) { } |
|
298
|
4 |
2 |
if (ref $$self{$attr} eq 'ARRAY') { } |
|
323
|
0 |
0 |
if $$self{'_debug'} |