Branch Coverage

blib/lib/WE_Frontend/Publish/FTP.pm
Criterion Covered Total %
branch 1 38 2.6


line true false branch
30 0 1 if ($] < 5.006)
35 0 0 if $@
56 0 0 ref $self->Config->project->stagingextracgi eq 'ARRAY' ? :
60 0 0 if (not defined $liveuser or $liveuser eq '')
63 0 0 if (not defined $livepassword or $livepassword eq '')
66 0 0 if (not defined $livehost or $livehost eq '')
69 0 0 if (not defined $pubhtmldir or $pubhtmldir eq '')
72 0 0 if (@extracgi and !defined($livecgidirectory) || $livecgidirectory eq '')
77 0 0 if ($v)
80 0 0 @extracgi ? :
88 0 0 unless my $ftp = 'Net::FTP'->new($livehost, 'Debug', 0)
89 0 0 unless $ftp->login($liveuser, $livepassword)
92 0 0 if (defined $livedirectory and $livedirectory ne '')
93 0 0 unless $ftp->cwd($livedirectory)
101 0 0 unless chdir $pubhtmldir
104 0 0 if ($v)
109 0 0 if ($v)
110 0 0 unless (-r $file)
111 0 0 unless $ftp->put($file, $file)