Condition Coverage

blib/lib/CPAN/FTP.pm
Criterion Covered Total %
condition 15 143 10.4


and 3 conditions

line !l l&&!r l&&r condition
26 0 0 0 exists &Errno::EAGAIN and $! == &Errno::EAGAIN
38 0 0 0 defined $ftpstats_size and $ftpstats_size <= 0
125 0 0 0 $fh and defined fileno $fh
135 0 0 0 @{[] unless $fullstats->{'history'};} and @{$fullstats->{'history'};} > $ftpstats_size || $time - $fullstats->{'history'}[0]{'start'} > 86400 * $ftpstats_period
212 3 0 0 $CPAN::Config->{'randomize_urllist'} and rand 1 < $CPAN::Config->{'randomize_urllist'}
346 3 0 0 -f $aslocal and -r _
3 0 0 -f $aslocal and -r _ and not $force & 1
398 0 0 0 defined $CPAN::FTP::ThesiteURL and ($ccurllist->[$b] eq $CPAN::FTP::ThesiteURL) <=> ($ccurllist->[$a] eq $CPAN::FTP::ThesiteURL)
437 0 3 0 not defined $CPAN::FTP::connect_to_internet_ok and defined $_
442 0 0 3 $scheme and 'file' eq $scheme
443 3 0 0 $sitetag && $sitetag eq 'defaultsites' && !@$ccurllist
487 0 0 3 -f $ret and $scheme eq 'file'
596 0 0 0 not -f $l and $l =~ m[^/\w:]
600 3 0 0 -f $l and -r _
607 0 0 0 -f $l and -r _
609 0 0 3 -f $ungz and -r _
0 0 0 -f $l and -r _
615 0 0 0 -f $aslocal and -s _
652 0 0 0 $url =~ /^http:/i and $CPAN::META->has_usable('HTTP::Tiny')
698 0 0 0 $res and $res->{'success'}
0 0 0 $res and $res->{'status'} ne '599'
0 0 0 $res and $res->{'status'} eq '599'
747 0 0 0 'CPAN::FTP'->ftp_get($host, $dir, "$getfile.gz", $gz) and eval { do { 'CPAN::Tarzip'->new($gz)->gunzip($aslocal) } }
762 0 0 0 UNIVERSAL::can($ro_url, 'text') and $ro_url->{'FROM'} eq 'USER'
947 0 0 0 $ftpbin and length $ftpbin
0 0 0 $ftpbin and length $ftpbin and 'MM'->maybe_command($ftpbin)

or 2 conditions

line l !l condition
126 0 0 $fullstats->{'history'} ||= []
134 0 0 $CPAN::Config->{'ftpstats_period'} || 14
204 0 0 $fullstats->{'history'} || []
225 0 3 $with_defaults ||= 0
228 3 0 $CPAN::Config->{'urllist'} ||= []
314 3 0 $force ||= 0
410 2 1 $CPAN::FTP::Themethod ||= ''
722 0 0 $@ || 'Unknown error'
785 0 0 $CPAN::Config->{'devnull'} || ''
913 0 0 $CPAN::Config->{'no_proxy'} || $ENV{'no_proxy'} || ''
976 0 0 $mtime ||= 0
1020 0 0 $mtime ||= 0
1058 0 0 $mtime ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
45 0 0 0 $fh ||= 'FileHandle'->new
51 0 0 0 $waitstart ||= localtime()
135 0 0 0 @{$fullstats->{'history'};} > $ftpstats_size || $time - $fullstats->{'history'}[0]{'start'} > 86400 * $ftpstats_period
160 0 0 0 $^O eq 'MSWin32' or $^O eq 'os2'
376 0 0 0 $CPAN::Config->{'ftp_proxy'} || $ENV{'ftp_proxy'}
378 0 0 0 $CPAN::Config->{'http_proxy'} || $ENV{'http_proxy'}
380 0 0 0 $CPAN::Config->{'no_proxy'} || $ENV{'no_proxy'}
694 0 0 0 $CPAN::Config->{'http_proxy'} || $ENV{'http_proxy'}
0 0 0 $CPAN::Config->{'no_proxy'} || $ENV{'no_proxy'}
909 2 0 0 $CPAN::Config->{'http_proxy'} || $ENV{'http_proxy'}
992 0 0 0 $netrc->hasdefault or $netrc->contains($host)
1126 0 0 0 $user{$uid} || $uid
1127 0 0 0 $group{$gid} || $gid