| line |
true |
false |
branch |
|
188
|
0 |
3 |
if $obj->_prefix |
|
204
|
0 |
0 |
if $self->_prefix |
|
217
|
0 |
4 |
if $self->_prefix |
|
235
|
0 |
3 |
if ($url) |
|
237
|
0 |
0 |
unless ($file) |
|
241
|
0 |
0 |
unless $file |
|
244
|
0 |
0 |
unless ($subdir) |
|
249
|
0 |
0 |
unless $subdir |
|
252
|
0 |
0 |
unless -d $archive_dir |
|
256
|
0 |
0 |
unless -d $archive_dir |
|
257
|
0 |
0 |
unless -w $archive_dir |
|
407
|
0 |
0 |
if ($$properties{'extra_dirs'}) |
|
408
|
0 |
0 |
if (ref $$properties{'extra_dirs'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $$properties{'extra_dirs'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $$properties{'extra_dirs'}) { } |
|
435
|
0 |
0 |
if ($$properties{'extra_dirs'}) |
|
436
|
0 |
0 |
if (ref $$properties{'extra_dirs'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $$properties{'extra_dirs'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $$properties{'extra_dirs'}) { } |
|
452
|
0 |
0 |
if $self->install_path($dir) |
|
454
|
0 |
0 |
unless $$extra_dirs{$dir}{'dest_dir'} |
|
478
|
0 |
0 |
if (-d $dir) |
|
480
|
0 |
0 |
$dir =~ /bin$/ ? : |
|
|
0 |
0 |
unless defined $contains_executables |
|
488
|
0 |
0 |
if ($result and $contains_executables) |
|
490
|
0 |
0 |
if $self->_should_be_executable($result) |
|
502
|
0 |
0 |
unless my $FIXIN = 'IO::File'->new($file) |
|
505
|
0 |
0 |
if ($line =~ /^\s*\#!\s*/) { } |
|
521
|
0 |
0 |
unless -d $dir |
|
553
|
1 |
1 |
$self->module_name ? : |
|
574
|
0 |
0 |
unless -e $localdir |
|
576
|
0 |
0 |
if (my $dest = $self->install_destination($type)) { } |
|
579
|
0 |
0 |
if ($self->install_path($type) and not 'File::Spec'->file_name_is_absolute($dest)) |
|
586
|
0 |
0 |
unless $type =~ /^(lib|bin)doc$/ |
|
594
|
0 |
0 |
unless ('File::Spec'->file_name_is_absolute($dest)) |
|
600
|
0 |
0 |
if ($self->create_packlist) |
|
604
|
0 |
0 |
if (length(my $destdir = $$self{'properties'}{'destdir'} || '')) |
|
689
|
1 |
1 |
if (not -f $file) { } |
|
694
|
1 |
0 |
if ($where) |
|
718
|
0 |
0 |
unless -d $directory |
|
719
|
0 |
0 |
unless -d $directory |
|
721
|
0 |
0 |
unless ('File::Spec'->file_name_is_absolute($archive_file)) |
|
726
|
0 |
0 |
if ($subdir and -d $subdir) |
|
733
|
0 |
0 |
unless my $ok = $ae->extract('to', $directory) |
|
735
|
0 |
0 |
if not -d $subdir |