Condition Coverage

blib/lib/App/Upfiles.pm
Criterion Covered Total %
condition 0 93 0.0


and 3 conditions

line !l l&&!r l&&r condition
247 0 0 0 $protocol eq 'ftp' and $options->{'use_TLS'}
434 0 0 0 $ftp->host($self->{'host'}) and $ftp->login($self->{'username'})
0 0 0 $ftp->host($self->{'host'}) and $ftp->login($self->{'username'}) and $ftp->binary
545 0 0 0 defined $remote_mtime and $remote_mtime == $local_mtime
0 0 0 defined $remote_mtime and $remote_mtime == $local_mtime and defined $remote_size
0 0 0 defined $remote_mtime and $remote_mtime == $local_mtime and defined $remote_size and $remote_size == $local_size
711 0 0 0 $options->{'copy_utime'} ne '2arg' and $options->{'copy_utime'} ne '5arg'
736 0 0 0 $options->{'copy_utime'} ne 'MFMT' and $options->{'copy_utime'} ne '5arg'
763 0 0 0 $options->{'copy_utime'} ne 'MFMT' and $options->{'copy_utime'} ne '2arg'
850 0 0 0 defined $re and $basename =~ /$re/
856 0 0 0 defined $re and $fullname =~ /$re/
979 0 0 0 defined $unique and $seen{$unique}++

or 2 conditions

line l !l condition
117 0 0 $action || 'upfiles'
283 0 0 $aref->[0] || (return)
338 0 0 $dbversion ||= 0
534 0 0 &File::stat::stat($filename) // (next)
540 0 0 $remote_mtime // 'undef'
0 0 $remote_size // 'undef'
814 0 0 $options->{'exclude_regexps'} // []
821 0 0 $options->{'exclude_basename_regexps'} // []
945 0 0 $facts{'type'} // ''

or 3 conditions

line l !l&&r !l&&!r condition
223 0 0 0 $self->{'config_filename'} // do { require File::HomeDir; my $homedir = 'File::HomeDir'->my_home // croak(&__('No home directory for config file (File::HomeDir)')); return 'File::Spec'->catfile($homedir, $self->CONFIG_FILENAME) }
225 0 0 0 'File::HomeDir'->my_home // croak(&__('No home directory for config file (File::HomeDir)'))
251 0 0 0 $self->{'ftp'}{$key} //= do { croak(&__x('Unrecognised protocol to remote: {protocol}', 'protocol', $self->{'protocol'})) unless my $class = $protocol_to_class{$protocol}; require Module::Load; Module::Load::load($class); $class->new('verbose', $self->{'verbose'}, 'copy_time', $options->{'copy_utime'} ? 1 : 0, $protocol eq 'ftps' ? ('use_SSL', 1) : ('use_TLS', $options->{'use_TLS'})) }
390 0 0 0 $options{'local'} // croak(&__('No local directory specified'))
393 0 0 0 $options{'remote'} // croak(&__('No remote target specified'))
459 0 0 0 $self->ftp->mkdir($unslashed, 1) // croak(&__x('Cannot make directory {dirname}: {ftperr}', 'dirname', $remote_dir, 'ftperr', scalar $self->ftp->message))
567 0 0 0 $self->ftp->mkdir($unslashed, 1) // croak(&__x('Cannot make directory {dirname}: {ftperr}', 'dirname', $filename, 'ftperr', scalar $self->ftp->message))
725 0 0 0 $options->{'copy_utime'} eq 'MFMT' or $code != 500
750 0 0 0 $options->{'copy_utime'} eq '2arg' or $code != 500
780 0 0 0 $options->{'copy_utime'} eq '5arg' or $code != 500
838 0 0 0 $basename eq $database_filename or $basename eq $database_journal_filename
862 0 0 0 &File::stat::stat($fullname) || croak(&__x('Cannot stat {filename}: {strerror}', 'filename', $fullname, 'strerror', $!))
961 0 0 0 $facts{'modify'} // &__('[unknown]')