line |
true |
false |
branch |
210
|
5 |
1 |
unless $self->show_config
|
215
|
3 |
4 |
if (defined $Config::Config{$key} and $Config::Config{$key} ne '')
|
224
|
5 |
1 |
unless $self->show_uname
|
227
|
0 |
1 |
unless (can_run($self->uname_call))
|
231
|
0 |
1 |
unless open my $fh, '-|', $self->uname_call, $self->_all_uname_args
|
236
|
0 |
1 |
unless close $fh
|
257
|
1 |
0 |
if defined $_
|
274
|
6 |
0 |
unless 'only' eq ($self->use_external_file || '')
|
285
|
0 |
6 |
unless (%{$prereqs;})
|
293
|
0 |
6 |
unless defined $phase_data
|
297
|
0 |
6 |
unless defined $type_data
|
312
|
0 |
1538 |
unless defined $module
|
314
|
1 |
1537 |
if 'perl' eq $module
|
316
|
196 |
1341 |
unless &is_module_name($module)
|
323
|
0 |
13271 |
if ref $incdir
|
325
|
12775 |
496 |
unless -e $fullpath
|
326
|
0 |
496 |
if -d $fullpath
|
331
|
845 |
496 |
unless defined $path
|
335
|
0 |
496 |
unless defined $mm
|
338
|
82 |
414 |
unless $v
|
363
|
12 |
2 |
if defined $result->[0]
|
364
|
1 |
13 |
if defined $result->[1]
|
368
|
1 |
1 |
if exists $modtable{$badmodule}
|
369
|
0 |
2 |
if exists $failures{$badmodule}
|
374
|
0 |
6 |
if ($] < 5.01) { }
|
389
|
1 |
5 |
if keys %failures
|
401
|
6 |
0 |
unless $self->use_external_file
|
403
|
0 |
0 |
$self->external_file_name =~ /[.]ya?ml\z/imsx ? :
|
|
0 |
0 |
$self->external_file_name =~ /[.]json\z/imsx ? :
|
410
|
0 |
0 |
if ('JSON' eq $type)
|
423
|
0 |
0 |
if ('YAML' eq $type)
|
445
|
0 |
6 |
if 'only' eq ($self->use_external_file || '')
|
448
|
5 |
2 |
if ('META.json' eq $file->name)
|
464
|
1 |
1 |
if ('META.yml' eq $file->name)
|
480
|
0 |
6 |
unless (keys %{$munged;})
|