line |
true |
false |
branch |
83
|
0 |
0 |
if ($dirname and $dirname ne ".")
|
85
|
0 |
0 |
unless ($ftp->cwd($dirname))
|
92
|
0 |
0 |
unless ($ftp->get($filename, $target))
|
120
|
0 |
0 |
if ($dirname and $dirname ne ".")
|
122
|
0 |
0 |
unless ($ftp->cwd($dirname))
|
130
|
0 |
0 |
unless $_ =~ /\A\.\.?\z/
|
146
|
0 |
0 |
if (scalar @path == 0)
|
163
|
0 |
0 |
if ($self->content) { }
|
167
|
0 |
0 |
if ref $data eq ""
|
169
|
0 |
0 |
unless $template->process(\$self->content, $data, \$content)
|
171
|
0 |
0 |
if (ref $data ne "")
|
188
|
0 |
0 |
if ($dirname and $dirname ne ".")
|
190
|
0 |
0 |
unless $ftp->cwd($dirname)
|
196
|
0 |
0 |
unless $ftp->put($source, $filename)
|
216
|
0 |
0 |
if ($self->path or $self->file) { }
|
221
|
0 |
0 |
if ($_ =~ m[\.\.|/])
|
231
|
0 |
0 |
if (wantarray) { }
|
243
|
0 |
0 |
unless my $ftp = "Net::FTP"->new($self->LOCATION, "Passive", !$self->active, "Debug", $self->debug, "Port", $self->port)
|
249
|
0 |
0 |
if ($self->username)
|
250
|
0 |
0 |
unless $ftp->login($self->username, $self->password)
|
255
|
0 |
0 |
if ($self->basedir)
|
257
|
0 |
0 |
unless $ftp->cwd($self->basedir)
|
260
|
0 |
0 |
if ($self->binary) { }
|