| line |
true |
false |
branch |
|
75
|
0 |
3 |
unless ($server) |
|
80
|
3 |
0 |
UNIVERSAL::isa($_[0], 'HASH') ? : |
|
|
3 |
0 |
@_ ? : |
|
88
|
9 |
6 |
exists $args{$_} ? : |
|
107
|
0 |
3 |
if $self->{'v'} |
|
112
|
0 |
3 |
unless ($self->{'client'}) |
|
114
|
0 |
0 |
if $self->{'v'} |
|
117
|
0 |
3 |
if $self->{'v'} |
|
119
|
0 |
3 |
if $self->{'v'} |
|
120
|
0 |
3 |
unless ($self->{'client'}->login($self->{'fuser'}, $self->{'fpasswd'})) |
|
123
|
0 |
0 |
if $self->{'v'} |
|
126
|
0 |
3 |
if $self->{'v'} |
|
139
|
0 |
3 |
unless UNIVERSAL::isa($self->{'client'}, "Net::FTP") |
|
145
|
2 |
1 |
unless -d $ddir |
|
146
|
0 |
3 |
unless (chdir $ddir) |
|
151
|
3 |
0 |
if chdir $lroot and $lroot = cwd() |
|
153
|
0 |
3 |
if ($self->{'ftype'} and $self->{'client'}->can($self->{'ftype'})) |
|
158
|
0 |
3 |
if $self->{'v'} |
|
163
|
2 |
1 |
unless $tottime |
|
167
|
0 |
3 |
if $self->{'v'} |
|
199
|
0 |
0 |
if ($key eq "all_defaults") |
|
207
|
0 |
0 |
unless exists $CONFIG{"df_$key"} |
|
209
|
0 |
0 |
if @_ |
|
228
|
0 |
35 |
if $verbose > 1 |
|
233
|
0 |
53 |
unless $Test::Smoke::FTPClient::a->{'type'} cmp $Test::Smoke::FTPClient::b->{'type'} |
|
235
|
108 |
36 |
if ($entry->{'type'} eq 'd') { } |
|
236
|
70 |
38 |
if $entry->{'name'} =~ /^\.\.?$/ |
|
238
|
24 |
14 |
unless (-d $new_locald) |
|
239
|
0 |
24 |
unless eval {
do {
mkpath($new_locald, $verbose, $entry->{'mode'})
}
} |
|
241
|
0 |
24 |
if $@ |
|
251
|
0 |
38 |
if $verbose > 1 |
|
259
|
17 |
19 |
if (-e $destname) |
|
266
|
17 |
19 |
if ($skip) { } |
|
269
|
0 |
19 |
if $verbose |
|
273
|
2 |
17 |
unless $dest |
|
275
|
0 |
17 |
unless $t_time |
|
282
|
17 |
0 |
$ord ? : |
|
286
|
0 |
17 |
if $verbose |
|
291
|
0 |
17 |
if $verbose > 1 |
|
295
|
33 |
0 |
if ($cleanup) |
|
297
|
0 |
33 |
if $verbose > 1 |
|
302
|
33 |
0 |
if (opendir DIR, ".") |
|
305
|
0 |
134 |
if $^O eq "VMS" |
|
306
|
36 |
98 |
if (-f $cmpname) { } |
|
|
19 |
79 |
elsif (-d $_ and not /^..?\z/) { } |
|
307
|
2 |
34 |
unless (exists $ok_file{$cmpname} and $ok_file{$cmpname} eq "f") |
|
309
|
0 |
2 |
if $verbose |
|
315
|
0 |
19 |
if $^O eq "VMS" |
|
316
|
0 |
19 |
unless (exists $ok_file{$cmpname} and $ok_file{$cmpname} eq "d") |
|
358
|
147 |
0 |
if ($field[0] =~ /[dwrx-]{7}/) { } |
|
370
|
0 |
0 |
$field[2] eq '' ? : |
|
417
|
0 |
114 |
$month > $local_month ? : |
|
|
114 |
33 |
$time_or_year =~ /:/ ? : |
|
440
|
0 |
0 |
if $off and lc $off eq "p" |