| line |
true |
false |
branch |
|
24
|
0 |
0 |
if (++$seen{"$c[1]|$c[2]|$_[0]"} > 3) |
|
29
|
0 |
0 |
if ($ENV{'AUTOMATED_TESTING'} || -!-t(STDIN) and not $ENV{'PERL_MM_USE_DEFAULT'}) { } |
|
45
|
0 |
0 |
@_ < 2 || $makemaker >= eval $_[1] ? : |
|
104
|
0 |
0 |
if ($makemaker_argtype{$key}) { } |
|
105
|
0 |
0 |
if ($makemaker_argtype{$key} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($makemaker_argtype{$key} eq 'HASH') { } |
|
|
0 |
0 |
elsif ($makemaker_argtype{$key} eq 'APPENDABLE') { } |
|
106
|
0 |
0 |
unless defined $args->{$key} |
|
107
|
0 |
0 |
unless (ref $args->{$key} eq 'ARRAY') |
|
113
|
0 |
0 |
ref $new_args{$key} eq 'ARRAY' ? : |
|
116
|
0 |
0 |
unless defined $args->{$key} |
|
126
|
0 |
0 |
if (defined $args->{$key}) |
|
142
|
0 |
0 |
defined $args->{$name} ? : |
|
174
|
0 |
0 |
ref $_[0] ? : |
|
189
|
0 |
0 |
unless (-d $dir) |
|
195
|
0 |
0 |
if /\.t$/ and -f $_ |
|
203
|
0 |
0 |
if @_ |
|
207
|
0 |
0 |
if ($perl_version) |
|
208
|
0 |
0 |
unless eval "use $perl_version; 1" |
|
216
|
0 |
0 |
if ($perl_version and $self->_cmp($perl_version, '5.006') >= 0) { } |
|
240
|
0 |
0 |
unless $args->{'VERSION'} = $self->version |
|
247
|
0 |
0 |
if ($self->tests) { } |
|
|
0 |
0 |
elsif ($Module::Install::ExtraTests::use_extratests) { } |
|
|
0 |
0 |
elsif (-d 'xt' and $Module::Install::AUTHOR || $ENV{'RELEASE_TESTING'}) { } |
|
261
|
0 |
0 |
if ($] >= 5.005) |
|
263
|
0 |
0 |
unless $self->author |
|
265
|
0 |
0 |
if ($self->makemaker(6.1)) |
|
269
|
0 |
0 |
if ($self->makemaker(6.17) and $self->sign) |
|
272
|
0 |
0 |
unless ($self->is_admin) |
|
275
|
0 |
0 |
if ($self->makemaker(6.31) and $self->license) |
|
304
|
0 |
0 |
if ($self->bundles) |
|
310
|
0 |
0 |
unless (exists $processed{$dist_dir}) |
|
311
|
0 |
0 |
if (-d $dist_dir) |
|
321
|
0 |
0 |
unless ($self->makemaker('6.55_03')) |
|
326
|
0 |
0 |
if (my $perl_version = $self->perl_version) |
|
327
|
0 |
0 |
unless eval "use $perl_version; 1" |
|
331
|
0 |
0 |
if ($self->makemaker(6.48)) |
|
336
|
0 |
0 |
if ($self->installdirs) |
|
337
|
0 |
0 |
if $args->{'INSTALLDIRS'} |
|
346
|
0 |
0 |
if (my $preop = $self->admin->preop($user_preop)) |
|
362
|
0 |
0 |
$self->preamble ? : |
|
370
|
0 |
0 |
unless open MAKEFILE, "+< $makefile_name" |
|
394
|
0 |
0 |
unless print MAKEFILE "$preamble$makefile$postamble" |
|
395
|
0 |
0 |
unless close MAKEFILE |
|
402
|
0 |
0 |
if defined $text |
|
409
|
0 |
0 |
if defined $text |