| line |
true |
false |
branch |
|
34
|
0 |
35 |
unless eval q[use base 'Module::Build'; 1] |
|
71
|
0 |
0 |
unless opendir my $scripts_dir, 'scripts' |
|
77
|
0 |
0 |
if $thing =~ /^\./ |
|
79
|
0 |
0 |
if (-d $thing) |
|
85
|
0 |
0 |
$int_ok ? : |
|
89
|
0 |
0 |
$accept ? : |
|
91
|
0 |
0 |
if ($prompt =~ /^[aA]/) { } |
|
|
0 |
0 |
elsif ($prompt =~ /^[iI]/) { } |
|
110
|
0 |
0 |
if $result =~ /^[qQ]/ |
|
111
|
0 |
0 |
if ($result =~ /^[yY]/) { } |
|
120
|
0 |
0 |
@chosen_scripts ? : |
|
142
|
0 |
0 |
unless (-d 'scripts') |
|
147
|
0 |
0 |
if ($chosen_scripts) |
|
148
|
0 |
0 |
if $chosen_scripts eq 'none' |
|
149
|
0 |
0 |
unless $chosen_scripts eq 'all' |
|
162
|
0 |
0 |
unless my $mess = shift() |
|
165
|
0 |
0 |
if ($self->_is_unattended and not @_) |
|
171
|
0 |
0 |
if @_ |
|
172
|
0 |
0 |
defined $def ? : |
|
179
|
0 |
0 |
unless (defined $ans and length $ans) |
|
196
|
0 |
0 |
if (-e 'MANIFEST' or -e 'MANIFEST.SKIP') |
|
233
|
0 |
0 |
if ($@) |
|
242
|
0 |
0 |
unless ($response->is_success) |
|
269
|
0 |
0 |
if defined $no_libdoc |
|
271
|
0 |
0 |
if ($self->{'no_libdoc'}) |
|
274
|
0 |
0 |
unless $type eq 'libdoc' |
|
325
|
0 |
0 |
if ($self->can($method)) |
|
342
|
0 |
0 |
$self->verbose ? : |
|
366
|
0 |
0 |
$accept ? : |
|
369
|
0 |
0 |
if ($proceed) { } |
|
373
|
0 |
0 |
if ($use_email) |
|
397
|
0 |
0 |
if (-f $self->metafile) |
|
405
|
0 |
0 |
if $self->is_windowsish |
|
428
|
0 |
0 |
$^O =~ /win/i ? : |