Branch Coverage

blib/lib/App/MechaCPAN/Install.pm
Criterion Covered Total %
branch 139 168 82.7


line true false branch
52 30 4 if (ref $opts->{'source'} ne 'HASH' and ref $opts->{'source'} ne 'CODE')
57 33 1 if (ref $opts->{'skip-tests-for'} ne 'ARRAY')
65 3 31 exists $ENV{'PERL_USE_UNSAFE_INC'} ? :
80 34 0 unless ($opts->{'install-man'})
105 14 5 unless (defined $source)
113 0 5 if (defined $target) { }
153 1 473 if ($target->{'state'} eq $COMPLETE or $target->{'state'} eq $FAILED)
160 425 48 if exists $target->{'dir'}
171 10 463 unless ($succ)
182 0 10 if ($opts->{'stop-on-error'})
192 456 7 if $target->{'state'} ne $COMPLETE
194 33 430 if ($target->{'state'} eq scalar @states)
210 9 25 if (@failed > 0)
226 6 44 unless _should_install($target)
236 1 43 unless _should_install($target)
241 43 0 if (@files == 1)
266 1 42 unless defined $meta
289 2 36 if (-e 'Build.PL' and not $is_mb_dep)
294 0 2 unless $configured
298 36 2 if (not defined $maker and -e 'Makefile.PL')
303 0 36 unless $configured
308 0 38 unless defined $maker
320 38 0 if defined $new_meta
352 37 1 unless ($skip_tests)
357 20 17 if (not $skip_tests and defined $target->{'modules'})
361 0 40 if ($skips->{$module})
369 6 30 if (not $skip_tests and $opts->{'smart-tests'})
379 31 7 unless ($skip_tests)
396 0 38 if (@incomplete_deps > 0)
419 2 36 if ($target->{'maker'} eq 'mb')
425 36 0 if ($target->{'maker'} eq 'mm')
445 7 31 if ($target->{'skip_tests'})
450 2 29 if ($target->{'maker'} eq 'mb')
456 29 0 if ($target->{'maker'} eq 'mm')
476 2 31 if ($target->{'maker'} eq 'mb')
482 31 0 if ($target->{'maker'} eq 'mm')
498 15 18 if ($target->{'is_cpan'})
553 133 1021 if (ref $target eq '')
555 2 131 if ($target =~ m[^ ([^/]+) @ (.*) $]msux) { }
565 186 968 if (ref $target eq 'ARRAY')
598 21 21 if ($alias =~ /$ident_re/u)
617 76 471 unless (defined $cached_target)
626 2 545 if ($cached_target->{'state'} eq $COMPLETE and $src->{'constraint'} ne $cached_target->{'constraint'})
637 652 989 if (defined $altname)
639 37 615 unless (exists $cache->{'targets'}{$altname})
646 214 333 if ($src->{'src_name'} =~ /$ident_re/u)
673 1 1 unless ($prereq->{'prereqs_was_installed'} and $prereq->{'was_installed'})
690 7 14 if exists $seen{$src}{$constraint}
694 5 9 if (defined $constraint)
701 14 0 if $ff->scheme eq 'https'
706 0 14 unless defined $where
721 26 32 if (-e -f $src)
729 2 30 if ($src =~ git_re())
732 0 2 unless has_updated_git()
735 0 2 unless has_git()
757 1 29 if ($src =~ url_re())
763 6 24 if ($src =~ /$pause_re/u)
780 23 7 unless (defined $url)
790 30 0 if (defined $url)
793 27 3 if ($url =~ /$full_pause_re/u)
805 28 2 if $ff->scheme eq 'https'
808 0 30 unless defined $where
820 0 71 if $module eq 'perl'
828 58 13 unless (defined $ver)
842 38 43 $my ? :
850 80 28 if defined $meta
871 218 57 if (exists $Module::CoreList::version{$]}{$module})
877 11 264 if $module ne 'perl' and not $is_core
899 13 129 if -r $tmp
909 44 50 unless defined $target->{'module'}
916 30 20 unless defined $ver
922 4 16 if $target->{'was_installed'}
924 6 14 unless ($target->{'update'})
931 6 0 if ($req->accepts_module($module, $ver))
942 1 13 if (defined $target->{'version'} and $target->{'version'} eq $ver)
963 44 0 if (ref $sources eq 'HASH')
968 0 44 if (ref $sources eq 'CODE')
973 0 44 if ($opts->{'only-sources'} and not defined $new_src)
975 0 0 if (exists $Module::CoreList::version{$]}{$src_name})
983 5 39 defined $new_src ? :
993 25 15 if (exists $target->{'installed_version'} and not $target->{'was_installed'})
999 20 5 if $ver eq $Module::CoreList::version{$]}{$module}
1002 0 40 if (exists $target->{'inital_version'} and not defined $target->{'inital_version'})
1008 0 0 if defined _get_mod_ver($target->{'module'})