| line |
!l |
l&&!r |
l&&r |
condition |
|
116
|
0 |
0 |
18 |
$control =~ /^\S+$/ and not $control =~ /\n/ |
|
141
|
15 |
3 |
0 |
not $option and defined $INC{"File::Spec::Unix"->catfile("Inline", "Files.pm")} |
|
|
18 |
0 |
0 |
not $option and defined $INC{"File::Spec::Unix"->catfile("Inline", "Files.pm")} and Inline::Files::get_filename($pkg) |
|
184
|
0 |
0 |
3 |
$language_id =~ /^\S+$/ and not $language_id =~ /\n/ |
|
232
|
10 |
0 |
0 |
$version_requested and not $version_printed |
|
291
|
0 |
0 |
13 |
$o->{'INLINE'}{'ILSM_suffix'} ne "so" and $o->{'INLINE'}{'ILSM_suffix'} ne "dll" |
|
|
0 |
0 |
13 |
$o->{'INLINE'}{'ILSM_suffix'} ne "so" and $o->{'INLINE'}{'ILSM_suffix'} ne "dll" and $o->{'INLINE'}{'ILSM_suffix'} ne "bundle" |
|
|
0 |
0 |
13 |
$o->{'INLINE'}{'ILSM_suffix'} ne "so" and $o->{'INLINE'}{'ILSM_suffix'} ne "dll" and $o->{'INLINE'}{'ILSM_suffix'} ne "bundle" and $o->{'INLINE'}{'ILSM_suffix'} ne "sl" |
|
|
0 |
13 |
0 |
$o->{'INLINE'}{'ILSM_suffix'} ne "so" and $o->{'INLINE'}{'ILSM_suffix'} ne "dll" and $o->{'INLINE'}{'ILSM_suffix'} ne "bundle" and $o->{'INLINE'}{'ILSM_suffix'} ne "sl" and ref $o eq "Inline" |
|
391
|
0 |
36 |
0 |
ref $value and ref $value ne "ARRAY" |
|
451
|
18 |
0 |
0 |
UNTAINT() and SAFEMODE() |
|
|
18 |
0 |
0 |
UNTAINT() and SAFEMODE() and not $o->{'CONFIG'}{'DIRECTORY'} |
|
461
|
0 |
0 |
18 |
$o->{'CONFIG'}{'CLEAN_AFTER_BUILD'} && !$o->{'CONFIG'}{'REPORTBUG'} |
|
498
|
0 |
0 |
0 |
$dirparts[-2] eq "blib" and $dirparts[-1] eq "lib" |
|
667
|
0 |
0 |
13 |
defined $code and $code |
|
669
|
12 |
0 |
1 |
$code =~ m[[/\\:]] and $code =~ m(^[/\\:\w.\-\ \$\[\]<>]+$) |
|
700
|
0 |
0 |
0 |
defined $INC{"File::Spec::Unix"->catfile("Inline", "Files.pm")} and $Inline::Files::VERSION =~ /^\d\.\d\d$/ |
|
|
0 |
0 |
0 |
defined $INC{"File::Spec::Unix"->catfile("Inline", "Files.pm")} and $Inline::Files::VERSION =~ /^\d\.\d\d$/ and $Inline::Files::VERSION ge "0.51" |
|
790
|
0 |
18 |
0 |
defined $config{'version'} and $config{'version'} =~ /TRIAL/ |
|
1103
|
0 |
0 |
0 |
m[^/] and -d $_ |
|
1144
|
0 |
0 |
0 |
$maybedir and -d $maybedir |
|
|
0 |
0 |
0 |
$maybedir and -d $maybedir and $dir =~ /\w{36,}/ |
|
1247
|
0 |
0 |
0 |
$o->{'INLINE'}{'object_ready'} and $o->{'CONFIG'}{'FORCE_BUILD'} |
|
1345
|
0 |
0 |
0 |
$maybefile and -f $maybefile |
|
1372
|
1 |
0 |
0 |
$env and -d $env |
|
|
1 |
0 |
0 |
$env and -d $env and -w $env |
|
|
0 |
0 |
1 |
$cwd = abs_path(".") and $cwd ne $home |
|
|
0 |
1 |
0 |
$cwd = abs_path(".") and $cwd ne $home and -d "File::Spec"->catdir($cwd, ".Inline") |
|
|
1 |
0 |
0 |
$cwd = abs_path(".") and $cwd ne $home and -d "File::Spec"->catdir($cwd, ".Inline") and -w "File::Spec"->catdir($cwd, ".Inline") |
|
1385
|
0 |
1 |
0 |
$bin = $FindBin::Bin and -d "File::Spec"->catdir($bin, ".Inline") |
|
|
1 |
0 |
0 |
$bin = $FindBin::Bin and -d "File::Spec"->catdir($bin, ".Inline") and -w "File::Spec"->catdir($bin, ".Inline") |
|
|
0 |
1 |
0 |
$home and -d "File::Spec"->catdir($home, ".Inline") |
|
|
1 |
0 |
0 |
$home and -d "File::Spec"->catdir($home, ".Inline") and -w "File::Spec"->catdir($home, ".Inline") |
|
|
0 |
0 |
1 |
defined $cwd and $cwd |
|
|
0 |
1 |
0 |
defined $cwd and $cwd and -d "File::Spec"->catdir($cwd, $did) |
|
|
1 |
0 |
0 |
defined $cwd and $cwd and -d "File::Spec"->catdir($cwd, $did) and -w "File::Spec"->catdir($cwd, $did) |
|
|
0 |
0 |
1 |
defined $bin and $bin |
|
|
0 |
1 |
0 |
defined $bin and $bin and -d "File::Spec"->catdir($bin, $did) |
|
|
1 |
0 |
0 |
defined $bin and $bin and -d "File::Spec"->catdir($bin, $did) and -w "File::Spec"->catdir($bin, $did) |
|
|
0 |
0 |
1 |
defined $cwd and $cwd |
|
|
0 |
0 |
1 |
defined $cwd and $cwd and -d $cwd |
|
|
0 |
0 |
1 |
defined $cwd and $cwd and -d $cwd and -w $cwd |
|
|
0 |
0 |
1 |
defined $cwd and $cwd and -d $cwd and -w $cwd and _mkdir("File::Spec"->catdir($cwd, $did), 511) |
|
|
0 |
0 |
0 |
defined $bin and $bin |
|
|
0 |
0 |
0 |
defined $bin and $bin and -d $bin |
|
|
0 |
0 |
0 |
defined $bin and $bin and -d $bin and -w $bin |
|
|
0 |
0 |
0 |
defined $bin and $bin and -d $bin and -w $bin and _mkdir("File::Spec"->catdir($bin, $did), 511) |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
17
|
0 |
0 |
10 |
$^O eq 'VMS' || $^O eq 'riscos' || $^O eq 'VOS' |
|
108
|
22 |
9 |
0 |
$CONFIG{$pkg}{'template'} ||= $default_config |
|
141
|
0 |
0 |
18 |
$option =~ /^(FILE|BELOW)$/i or not $option and defined $INC{"File::Spec::Unix"->catfile("Inline", "Files.pm")} and Inline::Files::get_filename($pkg) |
|
|
2 |
3 |
13 |
$option eq "DATA" or not $option |
|
181
|
3 |
0 |
0 |
$CONFIG{$pkg}{'template'} ||= $default_config |
|
273
|
14 |
0 |
0 |
not $o->{'INLINE'}{'object_ready'} or $o->{'CONFIG'}{'PRINT_INFO'} |
|
286
|
0 |
0 |
13 |
$o->{'INLINE'}{'object_ready'} or not length $o->{'INLINE'}{'ILSM_suffix'} |
|
454
|
0 |
0 |
0 |
$< == 0 or $> == 0 |
|
738
|
16 |
2 |
0 |
$o->{'CONFIG'}{'DIRECTORY'} || $o->find_temp_dir |
|
790
|
0 |
18 |
0 |
defined $config{'version'} and $config{'version'} =~ /TRIAL/ or $config{'version'} >= "0.4" |
|
1046
|
0 |
0 |
13 |
$Inline::Config{'apiversion'} || $Inline::Config{'xs_apiversion'} |
|
1103
|
0 |
0 |
0 |
-W $_ || -o $_ |
|
1343
|
0 |
0 |
0 |
$name eq $dot or $name eq $dotdot |
|
1429
|
24 |
94 |
0 |
mkdir($dir, $mode) || $!{'EEXIST'} |