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
248 0 0 0 $protocol eq "ftp" and $options->{'use_TLS'}
436 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
547 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
713 0 0 0 $options->{'copy_utime'} ne "2arg" and $options->{'copy_utime'} ne "5arg"
738 0 0 0 $options->{'copy_utime'} ne "MFMT" and $options->{'copy_utime'} ne "5arg"
765 0 0 0 $options->{'copy_utime'} ne "MFMT" and $options->{'copy_utime'} ne "2arg"
852 0 0 0 defined $re and $basename =~ /$re/
858 0 0 0 defined $re and $fullname =~ /$re/
981 0 0 0 defined $unique and $seen{$unique}++

or 2 conditions

line l !l condition
117 0 0 $action || 'upfiles'
285 0 0 $aref->[0] || (return)
340 0 0 $dbversion ||= 0
536 0 0 &File::stat::stat($filename) // (next)
542 0 0 $remote_mtime // "undef"
0 0 $remote_size // "undef"
816 0 0 $options->{'exclude_regexps'} // []
823 0 0 $options->{'exclude_basename_regexps'} // []
947 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)"))
252 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, "Passive", $options->{'passive'} ? 1 : 0, $protocol eq "ftps" ? ("use_SSL", 1) : ("use_TLS", $options->{'use_TLS'})) }
392 0 0 0 $options{'local'} // croak(&__("No local directory specified"))
395 0 0 0 $options{'remote'} // croak(&__("No remote target specified"))
461 0 0 0 $self->ftp->mkdir($unslashed, 1) // croak(&__x("Cannot make directory {dirname}: {ftperr}", "dirname", $remote_dir, "ftperr", scalar $self->ftp->message))
569 0 0 0 $self->ftp->mkdir($unslashed, 1) // croak(&__x("Cannot make directory {dirname}: {ftperr}", "dirname", $filename, "ftperr", scalar $self->ftp->message))
727 0 0 0 $options->{'copy_utime'} eq "MFMT" or $code != 500
752 0 0 0 $options->{'copy_utime'} eq "2arg" or $code != 500
782 0 0 0 $options->{'copy_utime'} eq "5arg" or $code != 500
840 0 0 0 $basename eq $database_filename or $basename eq $database_journal_filename
864 0 0 0 &File::stat::stat($fullname) || croak(&__x('Cannot stat {filename}: {strerror}', 'filename', $fullname, 'strerror', $!))
963 0 0 0 $facts{'modify'} // &__("[unknown]")