| line |
true |
false |
branch |
|
139
|
0 |
0 |
value($ftp_node, 'fixup') ? : |
|
147
|
0 |
1 |
if $useftp |
|
161
|
0 |
0 |
if $self->storage_status($sign) <= 0 |
|
168
|
0 |
0 |
if $uri->port |
|
171
|
0 |
0 |
unless (my $ftp = 'Net::FTP'->new($uri->host, %$attr)) |
|
179
|
0 |
0 |
unless ($ftp->login($uri->user || 'anonymous', $uri->password || 'anonymous@example.com')) |
|
188
|
0 |
0 |
if (length $path) |
|
189
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
190
|
0 |
0 |
unless (my $dir = $ftp->mkdir($path, 1)) |
|
196
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
216
|
0 |
0 |
if $self->storage_status('FTP') <= 0 |
|
228
|
0 |
0 |
if $uri->port |
|
232
|
0 |
0 |
unless (my $ftp = 'Net::FTP'->new($uri->host, %$attr)) |
|
238
|
0 |
0 |
if ($ostat) |
|
239
|
0 |
0 |
unless ($ftp->login($uri->user || 'anonymous', $uri->password || 'anonymous@example.com')) |
|
246
|
0 |
0 |
if ($ostat and length $path) |
|
247
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
254
|
0 |
0 |
if ($ostat) |
|
256
|
0 |
0 |
unless ($ftp->put($file, $name)) |
|
263
|
0 |
0 |
if ($ostat) |
|
265
|
0 |
0 |
unless ($src_size == $dst_size) |
|
272
|
0 |
0 |
if $ftp |
|
275
|
0 |
0 |
if $storage->{'fixup'} |
|
276
|
0 |
0 |
unless $ostat |
|
279
|
0 |
0 |
unless $status |
|
284
|
0 |
0 |
if ($self->storage_status('FTP') <= 0) |
|
296
|
0 |
0 |
if $uri->port |
|
299
|
0 |
0 |
unless (my $ftp = 'Net::FTP'->new($uri->host, %$attr)) |
|
305
|
0 |
0 |
unless ($ftp->login($uri->user || 'anonymous', $uri->password || 'anonymous@example.com')) |
|
307
|
0 |
0 |
if $ftp |
|
312
|
0 |
0 |
if (length $path) |
|
313
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
315
|
0 |
0 |
if $ftp |
|
325
|
0 |
0 |
unless ($ftp->get($name, $file)) |
|
327
|
0 |
0 |
if $ftp |
|
332
|
0 |
0 |
if $ftp |
|
336
|
0 |
0 |
unless ($src_size == $dst_size) |
|
342
|
0 |
0 |
unless ($self->validate($file)) |
|
358
|
0 |
0 |
if $self->storage_status('FTP') <= 0 |
|
366
|
0 |
0 |
if $uri->port |
|
370
|
0 |
0 |
unless (my $ftp = 'Net::FTP'->new($uri->host, %$attr)) |
|
376
|
0 |
0 |
if ($ostat) |
|
377
|
0 |
0 |
unless ($ftp->login($uri->user || 'anonymous', $uri->password || 'anonymous@example.com')) |
|
384
|
0 |
0 |
if ($ostat and length $path) |
|
385
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
393
|
0 |
0 |
if ($ostat) |
|
398
|
0 |
0 |
if ($ostat and grep {$_ eq $name;} @ls) |
|
399
|
0 |
0 |
unless ($ftp->delete($name)) |
|
406
|
0 |
0 |
if $ftp |
|
409
|
0 |
0 |
if $storage->{'fixup'} |
|
410
|
0 |
0 |
unless $ostat |
|
412
|
0 |
0 |
unless $status |
|
417
|
0 |
0 |
if $self->storage_status('FTP') <= 0 |
|
426
|
0 |
0 |
if $uri->port |
|
430
|
0 |
0 |
unless (my $ftp = 'Net::FTP'->new($uri->host, %$attr)) |
|
436
|
0 |
0 |
if ($ostat) |
|
437
|
0 |
0 |
unless ($ftp->login($uri->user || 'anonymous', $uri->password || 'anonymous@example.com')) |
|
444
|
0 |
0 |
if ($ostat and length $path) |
|
445
|
0 |
0 |
unless ($ftp->cwd($path)) |
|
452
|
0 |
0 |
if ($ostat) |
|
454
|
0 |
0 |
if defined $_ |
|
458
|
0 |
0 |
if $ftp |