Branch Coverage

lib/ExtUtils/MM_Any.pm
Criterion Covered Total %
branch 231 350 66.0


line true false branch
111 153 92 grep({$flavors{$_};} @_) ? :
127 0 0 defined &DynaLoader::boot_DynaLoader ? :
152 0 9 if ($^O eq "VMS")
155 0 0 if scalar $syms->getsym(uc $command)
160 0 9 if ('File::Spec'->file_name_is_absolute($command)) { }
168 0 90 unless $dir and -d $dir
169 0 90 $self->os_flavor_is('Win32') ? :
170 0 90 if $abs = $self->maybe_command($abs)
173 0 9 if wantarray
189 0 0 unless $self->os_flavor_is("Unix") or $self->os_flavor_is("Win32") and not $self->os_flavor_is("Win9x")
214 1484 37 if defined $maketype2true{$type}
216 1 36 if $make_basename =~ /\b$type\b/i
218 2 34 if $make_basename =~ /\b[gdn]make\b/i
221 34 0 $self->can_redirect_error ? :
224 2 32 if $type eq "gmake" and $minus_v =~ /GNU make/i
226 0 32 if $type eq "bsdmake" and $minus_v =~ /^usage:.*make\s*\[-B/im
246 0 2 if defined $cached_dep_space
247 2 0 if $self->is_make_type("gmake")
248 0 0 if $self->is_make_type("dmake")
249 0 0 if $self->is_make_type("bsdmake")
268 0 432 if $arg =~ / / and not $self->can_dep_space
308 323 774 unless @args
325 781 2347 if (not length $arg_str) { }
7 2340 elsif (length($arg_str) + length($next_arg_str) > $len_left) { }
349 1074 3 defined $self->{$1} ? :
410 6 428 unless (ref $opts)
414 7 427 unless defined $opts->{'allow_variables'}
419 434 0 if ($file)
420 2 432 $opts->{'append'} ? :
669 0 156 if ($self->{'XSMULTI'})
673 0 0 if $d[0] eq "lib"
735 0 156 if ($attribs{'FILES'})
739 0 0 ref $attribs{'FILES'} ? :
755 0 156 if ($^O eq 'vos') { }
781 0 156 if $attribs{'POSTOP'}
800 100 56 unless @{$self->{'DIR'};}
869 0 99 $self->{'NO_META'} ? :
870 99 0 !$self->{'SIGN'} ? :
957 0 0 if ($self->{'XSMULTI'}) { }
961 0 0 if $parts[0] eq "lib"
1025 0 0 if defined $extra
1095 312 0 "$]" > 5.008 ? :
1101 133 23 unless @man_cmds
1110 720 18 if defined $has_cpan_meta
1133 28 135 if $self->{'NO_META'} or not _has_cpan_meta()
1186 0 262 unless _has_cpan_meta()
1191 8 254 if ($bad_version)
1198 4 258 unless $validator2->is_valid
1205 262 0 unless $validator14->is_valid
1209 531 1 unless $key
1215 0 1 unless $validator14->custom_1($new_key)
1218 1 0 if $validator14->custom_1($new_key)
1228 0 262 if $@ and not $@ =~ /encountered CODE.*, but JSON can only represent references to arrays or hashes/
1233 0 262 unless ($meta and eval { do { $meta->as_string({"version", $METASPEC_V}) } } and eval { do { $meta->as_string } })
1241 2 0 if ($self->{'LICENSE'} and $self->{'LICENSE'} ne "unknown" and @{$now_license;} == 1 and $now_license->[0] eq "unknown")
1276 1 14 if (ref $h->{$k} eq 'ARRAY') { }
7 7 elsif (ref $h->{$k} eq 'HASH') { }
1277 1 0 ref $v ? :
1307 2 304 $unstable ? :
1320 13 293 defined $self->{'AUTHOR'} ? :
1328 0 306 unless (eval { do { require JSON::PP; require CPAN::Meta::Converter; "CPAN::Meta::Converter"->VERSION("2.14117") } })
1337 306 306 $frag == $meta_add ? :
1345 3 309 if ($v1_add and $key eq 'prereqs') { }
3 306 elsif ($key ne 'meta-spec') { }
1353 306 6 if $key eq "meta-spec"
1371 6 458 $self->{'ARGS'}{'CONFIGURE_REQUIRES'} ? :
1374 6 458 $self->{'ARGS'}{'BUILD_REQUIRES'} ? :
1376 6 458 if $self->{'ARGS'}{'TEST_REQUIRES'}
1378 92 372 if $self->{'ARGS'}{'PREREQ_PM'}
1380 21 443 if $self->{'MIN_PERL_VERSION'}
1388 10 908 if defined $meta->{'meta-spec'} and defined $meta->{'meta-spec'}{'version'}
1396 0 0 if ($self->{'ARGS'}{'CONFIGURE_REQUIRES'}) { }
1403 0 0 if ($self->{'ARGS'}{'BUILD_REQUIRES'}) { }
1410 0 0 if ($self->{'ARGS'}{'TEST_REQUIRES'})
1417 0 0 if defined $self->{'PREREQ_PM'}
1419 0 0 if $self->{'MIN_PERL_VERSION'}
1425 1 326 unless defined $version
1427 4 323 if (ref $version eq 'version') { }
0 323 elsif ($version =~ /^[^v][^.]*\.[^.]+\./) { }
1472 0 26 unless ref $_[0] eq "HASH"
1481 13 13 exists $options->{'key_sort'} ? :
1482 13 13 if ($k_sort) { }
1483 0 13 unless ref $k_sort eq "CODE"
1489 13 13 $options->{'use_header'} ? :
1502 2 82 unless defined $val
1503 14 70 if (ref $val eq 'HASH') { }
5 65 elsif (ref $val eq 'ARRAY') { }
1 64 elsif (ref $val and not blessed($val)) { }
1504 13 1 if (keys %$val) { }
1510 0 13 if (exists $customs->{$key})
1513 0 0 if exists $k_custom{$k}
1524 4 1 if (@$val) { }
1528 1 6 if ref $_
1638 154 4 unless ($mymeta)
1659 28 130 unless _has_cpan_meta()
1663 378 4 unless -e $file
1667 4 0 if $meta
1669 126 4 unless $meta
1674 4 0 if ($meta->{'generated_by'} and $meta->{'generated_by'} =~ /ExtUtils::MakeMaker version ([\d\._]+)/)
1677 0 4 if ($eummv < "6.2501")
1697 28 127 unless _has_cpan_meta()
1720 0 156 if ($self->{'PERL_CORE'})
1725 0 156 if ($self->has_link_code)
1729 0 156 if ($attribs{'FILES'})
1730 0 0 if (ref $attribs{'FILES'}) { }
1754 0 156 if $attribs{'POSTOP'}
1775 100 56 unless @{$self->{'DIR'};}
1861 0 156 if $ENV{'CLEARCASE_ROOT'}
1886 0 1 if ($self->{'ABSTRACT_FROM'} and $self->{'ABSTRACT'})
1892 1 157 if ($self->{'ABSTRACT_FROM'})
1893 0 1 unless $self->{'ABSTRACT'} = $self->parse_abstract($self->{'ABSTRACT_FROM'})
1898 0 158 if ($self->{'ABSTRACT'} and $self->{'ABSTRACT'} =~ /[[:cntrl:]]+/)
1924 102 57 unless ($self->{'INST_LIB'})
1925 0 102 if ($self->{'PERL_CORE'}) { }
1961 0 2 if ($self->{'ARGS'}{'INSTALL_BASE'} and $self->{'ARGS'}{'PREFIX'})
1965 2 156 if ($self->{'ARGS'}{'INSTALL_BASE'}) { }
1991 304 8 unless $ExtUtils::MM_Any::Config{$k}
1997 310 2 unless ($ExtUtils::MM_Any::Config{$k})
1999 6 303 $ExtUtils::MM_Any::Config{'usevendorprefix'} ? :
2005 2 154 unless $ExtUtils::MM_Any::Config{'installsitebin'}
2007 2 154 unless $ExtUtils::MM_Any::Config{'installsitescript'}
2009 156 0 unless ($ExtUtils::MM_Any::Config{'installvendorbin'})
2012 4 152 $ExtUtils::MM_Any::Config{'usevendorprefix'} ? :
2014 156 0 unless ($ExtUtils::MM_Any::Config{'installvendorscript'})
2017 4 152 $ExtUtils::MM_Any::Config{'usevendorprefix'} ? :
2023 4 152 $ExtUtils::MM_Any::Config{'usevendorprefix'} ? :
2027 2 154 unless $sprefix
2032 2 154 if ($self->{'PREFIX'}) { }
2053 0 156 if ($self->{'LIBSTYLE'})
2055 0 0 $self->{'LIBSTYLE'} eq 'lib/perl5' ? :
2062 228 84 unless $ExtUtils::MM_Any::Config{'installman' . $num . 'dir'}
2147 0 156 if ($self->{'LIB'})
2151 0 0 if ($var =~ /arch/) { }
2171 0 2808 if $ExtUtils::MM_Any::Verbose >= 2
2175 552 2256 if $self->{$Installvar}
2177 936 1320 if $style
2180 0 2256 if $ExtUtils::MM_Any::Verbose >= 2
2222 12 24 $thing =~ /^man.dir$/ && !$ExtUtils::MM_Any::Config{lc $key} ? :
2277 94 64 if ($self->{'VERSION_FROM'})
2279 0 94 if ($self->{'VERSION'} eq "undef")
2285 109 49 if (defined $self->{'VERSION'}) { }
2286 2 107 unless ($self->{'VERSION'} =~ /^\s*v?[\d_\.]+\s*$/)
2289 0 2 if defined $normal
2397 159 0 unless defined $self->{'NOECHO'}
2439 2 157 if (grep $_, @libs[0..2])
2446 0 157 if ($self->{'OBJECT'}) { }
0 157 elsif ($self->{'MAGICXS'} || $self->{'XSMULTI'} and @{[] unless $self->{'O_FILES'};}) { }
2447 0 0 if ref $self->{'OBJECT'}
2449 0 0 unless $self->{'O_FILES'}
2455 0 157 unless $self->{'C'}
0 157 if @{[] unless $self->{'C'};}
2459 0 157 -f "$self->{'BASEEXT'}_BS" ? :
2461 157 0 unless $self->{'LDFROM'}
2467 100 57 unless ($self->{'LINKTYPE'})
2470 98 2 $ExtUtils::MM_Any::Config{'usedl'} ? :
0 100 $self->{'SKIPHASH'}{'dynamic'} ? :
2482 1 7 !defined($libs->[0]) ? :
4 9 !ref($libs) ? :
153 13 !defined($libs) ? :
2503 0 156 if $is_nmake
2522 158 4522 unless defined(my $value = $self->{$tool})
2524 0 4522 if ($is_nmake) { }
2711 0 156 $attribs{'MAXLEN'} ? :
2750 1 161 if $self->{'PERL_SRC'}
2759 4 157 if ($pthinks ne $cthinks)
2767 3 1 unless $self->{'UNINSTALLED_PERL'}
2819 113 0 -d 't' ? :
2849 0 0 unless -d $dir
2857 0 0 unless /\.t$/
2924 6 1030 if ($path =~ /^README\.pod$/i)
2930 4 1026 if grep /^(?:RCS|CVS|SCCS|\.svn|_darcs)$/, $self->splitdir($dirs), $file
3002 0 0 if $self->{'MIN_PERL_VERSION'}
3003 0 0 if $self->{'BUILD_REQUIRES'}
3032 0 0 if ($self->{'MIN_PERL_VERSION'})
3060 0 0 unless opendir my $dh, $header_dir