line |
!l |
l&&!r |
l&&r |
condition |
94
|
0 |
0 |
0 |
$default and not $pass
|
150
|
4 |
0 |
0 |
$p{'destdir'} and -d $p{'destdir'}
|
156
|
0 |
0 |
4 |
$self->is_writable($file, %args) and $self->is_writable($archive, %args)
|
169
|
0 |
0 |
0 |
$p{'sudo'} and $< != 0
|
187
|
0 |
0 |
0 |
$sudo and $cp
|
373
|
1 |
1 |
0 |
-e $dir and not -d $dir
|
670
|
0 |
5 |
0 |
-e $f1 and -e $f2
|
713
|
2 |
0 |
2 |
-f "$f.md5" && $sum =~ /[0-9a-f]+/i
|
747
|
44 |
0 |
0 |
$bin =~ m[^/] and -x $bin
|
1013
|
0 |
0 |
17 |
$m and $m =~ m[^/]
|
1087
|
0 |
0 |
0 |
$fetchbin and -x $fetchbin
|
1094
|
0 |
0 |
0 |
$fetchbin and -x $fetchbin
|
1102
|
0 |
0 |
0 |
$fetchbin and -x $fetchbin
|
1116
|
0 |
0 |
0 |
-e $file and $dir
|
|
0 |
0 |
0 |
-e $file and $dir and -d $dir
|
1178
|
0 |
1 |
0 |
$self->is_writable($existing, 'fatal', 0) and $self->is_writable($newfile, 'fatal', 0)
|
1205
|
0 |
0 |
0 |
$uid and $gid
|
1214
|
0 |
0 |
0 |
-e $existing and $mode
|
1223
|
0 |
0 |
0 |
-e $existing and $p{'archive'}
|
1226
|
0 |
0 |
0 |
$uid and $gid
|
1339
|
0 |
0 |
0 |
$bintest and $self->find_bin($bintest, 'fatal', 0, 'debug', 0)
|
1369
|
0 |
0 |
0 |
-d $sub_path and chdir $sub_path
|
1402
|
0 |
0 |
0 |
defined $sub_path and -d "$package/$sub_path"
|
1451
|
0 |
0 |
0 |
$patches and $$patches[0]
|
1489
|
0 |
0 |
0 |
-d $portdir and chdir $portdir
|
1555
|
0 |
0 |
0 |
$module eq 'Provision::Unix' and $version
|
1591
|
0 |
0 |
0 |
$portdir and -d $portdir
|
|
0 |
0 |
0 |
$portdir and -d $portdir and chdir $portdir
|
1647
|
0 |
0 |
0 |
@$targets[0] and @$targets[0] ne ''
|
1692
|
0 |
0 |
0 |
defined $ARGV and $ARGV eq '-'
|
1695
|
0 |
0 |
0 |
@ARGV > 0 && $ARGV[0] eq '-' && -t *STDIN
|
1704
|
0 |
0 |
0 |
-t *STDIN && (@ARGV == 0 || $ARGV[0] eq '-')
|
1765
|
0 |
8 |
0 |
-e $path and not -w $path
|
1895
|
1 |
1 |
1 |
-e $file and not -f $file
|
2085
|
0 |
0 |
0 |
$path_to_sudo and -x $path_to_sudo
|
2148
|
0 |
15 |
0 |
$is_safe and not $bin
|
2157
|
0 |
10 |
5 |
$bin and not -e $bin
|
2171
|
15 |
0 |
0 |
$tainted and not $is_safe
|
2284
|
0 |
0 |
0 |
$response && $response eq 'y'
|