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) |