| line |
true |
false |
branch |
|
29
|
0 |
3 |
unless $self->url |
|
33
|
0 |
3 |
if $self->passive |
|
40
|
0 |
0 |
if $options{'http_headers'} |
|
44
|
0 |
0 |
unless $url->scheme eq "ftp" |
|
47
|
0 |
0 |
if $self->passive |
|
52
|
0 |
0 |
unless ($path =~ m[/$]) |
|
59
|
0 |
0 |
unless $ftp->cwd($dir) |
|
63
|
0 |
0 |
unless (eval {
do {
$ftp->get($filename, $path)
}
}) |
|
67
|
0 |
0 |
$self->passive ? : |
|
70
|
0 |
0 |
unless $ftp->cwd($dir) |
|
72
|
0 |
0 |
unless $ftp->get($filename, $path) |
|
78
|
0 |
0 |
if (defined $path) |
|
92
|
0 |
0 |
unless $ftp->cwd($path) |
|
95
|
0 |
0 |
unless (defined $list) |
|
99
|
0 |
0 |
$self->passive ? : |
|
102
|
0 |
0 |
unless $ftp->cwd($path) |
|
106
|
0 |
0 |
unless defined $list |
|
109
|
0 |
0 |
unless @$list |
|
111
|
0 |
0 |
unless $path =~ m[/$] |
|
138
|
0 |
0 |
unless my $ftp = "Net::FTP"->new($url->host, "Port", $url->port, "Passive", $is_passive) |
|
142
|
0 |
0 |
unless $ftp->login($url->user, $url->password) |