Branch Coverage

blib/lib/App/MechaCPAN/Install.pm
Criterion Covered Total %
branch 137 164 83.5


line true false branch
51 30 4 if (ref $opts->{'source'} ne 'HASH' and ref $opts->{'source'} ne 'CODE')
56 33 1 if (ref $opts->{'skip-tests-for'} ne 'ARRAY')
64 3 31 exists $ENV{'PERL_USE_UNSAFE_INC'} ? :
79 34 0 unless ($opts->{'install-man'})
104 14 5 unless (defined $source)
112 0 5 if (defined $target) { }
152 1 473 if ($target->{'state'} eq $COMPLETE or $target->{'state'} eq $FAILED)
159 425 48 if exists $target->{'dir'}
170 10 463 unless ($succ)
181 0 10 if ($opts->{'stop-on-error'})
191 456 7 if $target->{'state'} ne $COMPLETE
193 33 430 if ($target->{'state'} eq scalar @states)
209 9 25 if (@failed > 0)
225 6 44 unless _should_install($target)
235 1 43 unless _should_install($target)
240 43 0 if (@files == 1)
265 1 42 unless defined $meta
288 2 36 if (-e 'Build.PL' and not $is_mb_dep)
293 0 2 unless $configured
297 36 2 if (not defined $maker and -e 'Makefile.PL')
302 0 36 unless $configured
307 0 38 unless defined $maker
319 38 0 if defined $new_meta
351 37 1 unless ($skip_tests)
356 20 17 if (not $skip_tests and defined $target->{'modules'})
360 0 40 if ($skips->{$module})
368 6 30 if (not $skip_tests and $opts->{'smart-tests'})
378 31 7 unless ($skip_tests)
395 0 38 if (@incomplete_deps > 0)
418 2 36 if ($target->{'maker'} eq 'mb')
424 36 0 if ($target->{'maker'} eq 'mm')
444 7 31 if ($target->{'skip_tests'})
449 2 29 if ($target->{'maker'} eq 'mb')
455 29 0 if ($target->{'maker'} eq 'mm')
475 2 31 if ($target->{'maker'} eq 'mb')
481 31 0 if ($target->{'maker'} eq 'mm')
497 15 18 if ($target->{'is_cpan'})
552 133 1021 if (ref $target eq '')
554 2 131 if ($target =~ m[^ ([^/]+) @ (.*) $]msux) { }
564 186 968 if (ref $target eq 'ARRAY')
597 21 21 if ($alias =~ /$ident_re/u)
616 76 471 unless (defined $cached_target)
625 2 545 if ($cached_target->{'state'} eq $COMPLETE and $src->{'constraint'} ne $cached_target->{'constraint'})
636 652 989 if (defined $altname)
638 37 615 unless (exists $cache->{'targets'}{$altname})
645 214 333 if ($src->{'src_name'} =~ /$ident_re/u)
672 1 1 unless ($prereq->{'prereqs_was_installed'} and $prereq->{'was_installed'})
689 7 14 if exists $seen{$src}{$constraint}
693 5 9 if (defined $constraint)
700 14 0 if $ff->scheme eq 'https'
705 0 14 unless defined $where
720 26 32 if (-e -f $src)
728 2 30 if ($src =~ git_re())
749 1 29 if ($src =~ url_re())
755 6 24 if ($src =~ /$pause_re/u)
772 23 7 unless (defined $url)
782 30 0 if (defined $url)
785 27 3 if ($url =~ /$full_pause_re/u)
797 28 2 if $ff->scheme eq 'https'
800 0 30 unless defined $where
812 0 71 if $module eq 'perl'
820 58 13 unless (defined $ver)
834 38 43 $my ? :
842 80 28 if defined $meta
863 219 57 if (exists $Module::CoreList::version{$]}{$module})
869 11 265 if $module ne 'perl' and not $is_core
891 13 129 if -r $tmp
901 44 50 unless defined $target->{'module'}
908 30 20 unless defined $ver
914 4 16 if $target->{'was_installed'}
916 6 14 unless ($target->{'update'})
923 6 0 if ($req->accepts_module($module, $ver))
934 1 13 if (defined $target->{'version'} and $target->{'version'} eq $ver)
955 44 0 if (ref $sources eq 'HASH')
960 0 44 if (ref $sources eq 'CODE')
965 0 44 if ($opts->{'only-sources'} and not defined $new_src)
967 0 0 if (exists $Module::CoreList::version{$]}{$src_name})
975 5 39 defined $new_src ? :
985 25 15 if (exists $target->{'installed_version'} and not $target->{'was_installed'})
991 20 5 if $ver eq $Module::CoreList::version{$]}{$module}
994 0 40 if (exists $target->{'inital_version'} and not defined $target->{'inital_version'})
1000 0 0 if defined _get_mod_ver($target->{'module'})