| line |
true |
false |
branch |
|
60
|
0 |
0 |
unless ($$self{'SKIPHASH'}{'dynamic'}) |
|
74
|
0 |
0 |
if ($$self{'IMPORTS'} and %{$$self{'IMPORTS'};}) |
|
76
|
0 |
0 |
unless -d 'tmp_imp' or mkdir 'tmp_imp', 511 |
|
77
|
0 |
0 |
unless open my $imp, '>', 'tmpimp.imp' |
|
79
|
0 |
0 |
unless my($lib, $id) = $exp =~ /(.*)\.(.*)/ |
|
82
|
0 |
0 |
unless close $imp |
|
84
|
0 |
0 |
if system "emximp -o tmpimp$Config::Config{'lib_ext'} tmpimp.imp" |
|
87
|
0 |
0 |
unless eval {
do {
unlink ;
1
}
} |
|
88
|
0 |
0 |
if system "cd tmp_imp; $Config::Config{'ar'} x ../tmpimp$Config::Config{'lib_ext'}" |
|
97
|
0 |
0 |
unless $$self{'IMPORTS'} and %{$$self{'IMPORTS'};} |
|
100
|
0 |
0 |
unless length $chunks[0] |
|
117
|
0 |
0 |
if -x $file and not -d _ |
|
118
|
0 |
0 |
if -x "$file.exe" and not -d _ |
|
119
|
0 |
0 |
if -x "$file.cmd" and not -d _ |
|
132
|
0 |
0 |
$OS2::is_aout ? : |