Branch Coverage

lib/CPANPLUS/Internals.pm
Criterion Covered Total %
branch 43 62 69.3


line true false branch
84 81 18950 if @_ > 1
149 0 14 if (my $id = $class->_last_id)
157 0 14 unless my $args = check($Tmpl, \%hash)
169 28 14 $callback_map->{$name} ? :
56 42 ref $callback_map->{$name} ? :
176 8 5 ref $callback_map->{$name} ? :
187 0 14 unless $conf->_set_build("startdir", cwd())
190 14 0 if $conf->get_conf("passive")
194 0 14 unless ($id == $args->_id)
203 14 0 if (can_load('modules', {$store, '0.0'}, 'verbose', 1)) { }
206 0 0 if ($store ne 'CPANPLUS::Internals::Source::Memory') { }
245 0 9 unless my $args = check($tmpl, \%hash)
252 5 10 if ($what eq 'lib') { }
2 8 elsif ($what eq 'modules') { }
2 6 elsif ($what eq 'methods') { }
3 3 elsif ($what eq 'load') { }
279 3 0 if (exists $self->{$cache} and exists $Tmpl->{$cache}) { }
348 0 9 unless my $self = shift()
359 0 9 unless check($tmpl, \%hash)
361 0 9 unless $self->_callbacks->$name($code)
423 0 12 unless check($tmpl, \%hash)
429 16 16 unless grep {$_ eq $lib;} @INC
434 13 19 unless $ENV{'PERL5LIB'} =~ qr/\Q$s$lib\E/
461 0 10 unless check($tmpl, \%hash)
470 4 16 if $ENV{'PATH'} =~ qr/\Q$dir\E/
471 4 12 unless -d $dir
472 8 4 unless File::Glob::bsd_glob($dir . "/*")
518 0 15 unless my $obj = shift()
520 0 15 unless (sub { ;}->($obj))
532 0 831 unless my $id = shift()
540 0 1 unless my $id = shift()