Condition Coverage

blib/lib/CPAN/FTP.pm
Criterion Covered Total %
condition 19 133 14.2


and 3 conditions

line !l l&&!r l&&r condition
185 3 0 0 $$CPAN::Config{'randomize_urllist'} and rand 1 < $$CPAN::Config{'randomize_urllist'}
319 3 0 0 -f $aslocal and -r _
3 0 0 -f $aslocal and -r _ and not $force & 1
369 0 0 0 defined $CPAN::FTP::ThesiteURL and ($$ccurllist[$b] eq $CPAN::FTP::ThesiteURL) <=> ($$ccurllist[$a] eq $CPAN::FTP::ThesiteURL)
410 0 3 0 not defined $CPAN::FTP::connect_to_internet_ok and defined $_
415 0 0 3 $scheme and 'file' eq $scheme
416 3 0 0 $sitetag && $sitetag eq 'defaultsites' && !@$ccurllist
460 0 0 3 -f $ret and $scheme eq 'file'
569 0 0 0 not -f $l and $l =~ m[^/\w:]
573 3 0 0 -f $l and -r _
580 0 0 0 -f $l and -r _
582 0 0 3 -f $ungz and -r _
0 0 0 -f $l and -r _
588 0 0 0 -f $aslocal and -s _
625 0 0 0 $url =~ /^http:/ and $CPAN::META->has_usable('HTTP::Tiny')
671 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'
720 0 0 0 'CPAN::FTP'->ftp_get($host, $dir, "$getfile.gz", $gz) and eval { do { 'CPAN::Tarzip'->new($gz)->gunzip($aslocal) } }
735 0 0 0 UNIVERSAL::can($ro_url, 'text') and $$ro_url{'FROM'} eq 'USER'
920 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
104 0 0 $$fullstats{'history'} ||= []
110 0 0 $$CPAN::Config{'ftpstats_size'} || 99
111 0 0 $$CPAN::Config{'ftpstats_period'} || 14
177 0 0 $$fullstats{'history'} || []
198 0 3 $with_defaults ||= 0
201 3 0 $$CPAN::Config{'urllist'} ||= []
287 3 0 $force ||= 0
383 2 1 $CPAN::FTP::Themethod ||= ''
695 0 0 $@ || 'Unknown error'
758 0 0 $$CPAN::Config{'devnull'} || ''
886 2 0 $$CPAN::Config{'no_proxy'} || $ENV{'no_proxy'} || ''
949 0 0 $mtime ||= 0
993 0 0 $mtime ||= 0
1031 0 0 $mtime ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
29 0 0 0 $fh ||= 'FileHandle'->new
36 0 0 0 $waitstart ||= localtime()
112 0 0 0 @{$$fullstats{'history'};} > $ftpstats_size or $time - $$fullstats{'history'}[0]{'start'} > 86400 * $ftpstats_period
133 0 0 0 $^O eq 'MSWin32' or $^O eq 'os2'
348 0 0 1 $$CPAN::Config{'ftp_proxy'} || $ENV{'ftp_proxy'}
350 0 0 1 $$CPAN::Config{'http_proxy'} || $ENV{'http_proxy'}
352 0 0 1 $$CPAN::Config{'no_proxy'} || $ENV{'no_proxy'}
664 0 0 0 $$CPAN::Config{'http_proxy'} || $ENV{'http_proxy'}
0 0 0 $$CPAN::Config{'no_proxy'} || $ENV{'no_proxy'}
882 2 0 0 $$CPAN::Config{'http_proxy'} || $ENV{'http_proxy'}
965 0 0 0 $netrc->hasdefault or $netrc->contains($host)
1099 0 0 0 $user{$uid} || $uid
1100 0 0 0 $group{$gid} || $gid