line |
true |
false |
branch |
29
|
0 |
0 |
unless ($CACHE and $_table_res) |
37
|
8 |
106 |
if (ref $cond eq 'Regexp') { } |
|
54 |
52 |
elsif (ref $cond eq 'ARRAY') { } |
38
|
6 |
2 |
unless $target =~ /$cond/ |
40
|
58 |
0 |
$is_numeric ? : |
|
32 |
22 |
unless grep {$is_numeric ? $target == $_ : $target eq $_;} @$cond |
42
|
8 |
44 |
$is_numeric ? : |
|
44 |
8 |
unless $is_numeric ? $target == $cond : $target eq $cond |
57
|
0 |
33 |
if @unknown_args |
74
|
8 |
122 |
if (defined $args{'filter'}) |
76
|
4 |
4 |
unless $args{'filter'}->($p) |
78
|
7 |
1 |
unless _match($p->{'pid'}, $args{'pid'}, 1) |
|
8 |
118 |
if (defined $args{'pid'}) |
79
|
10 |
2 |
unless _match($p->{'name'}, $args{'name'}) |
|
12 |
107 |
if (defined $args{'name'}) |
80
|
10 |
2 |
unless _match($p->{'cmndline'}, $args{'cmndline'}) |
|
12 |
97 |
if (defined $args{'cmndline'}) |
81
|
28 |
71 |
if (defined $args{'exec'}) |
83
|
20 |
8 |
unless ($args{'exec'} =~ m[/]) |
86
|
23 |
5 |
unless _match($exec, $args{'exec'}) |
88
|
26 |
50 |
if (defined $args{'user'} or defined $args{'uid'}) |
90
|
0 |
26 |
if ($cond eq 'Regexp') { } |
91
|
0 |
0 |
unless _match($p->{'uid'}, $cond, 1) |
94
|
4 |
22 |
ref $cond eq 'ARRAY' ? : |
95
|
30 |
0 |
if ($val =~ /\A\d+\z/) { } |
99
|
0 |
0 |
@pw ? : |
102
|
15 |
11 |
unless _match($p->{'uid'}, \@uids, 1) |
105
|
28 |
33 |
if (defined $args{'euser'} or defined $args{'euid'}) |
107
|
0 |
28 |
if ($cond eq 'Regexp') { } |
108
|
0 |
0 |
unless _match($p->{'euid'}, $cond, 1) |
111
|
0 |
28 |
ref $cond eq 'ARRAY' ? : |
112
|
28 |
0 |
if ($val =~ /\A\d+\z/) { } |
116
|
0 |
0 |
@pw ? : |
119
|
17 |
11 |
unless _match($p->{'euid'}, \@uids, 1) |
126
|
0 |
130 |
if $args{'inverse'} |
127
|
86 |
44 |
unless $cond |
129
|
4 |
40 |
if ($args{'detail'}) { } |
135
|
1 |
43 |
if (defined $args{'result_max'}) |
136
|
1 |
0 |
if @res >= $args{'result_max'} |
144
|
1 |
1 |
@{find_proc(@_, 'result_max', 1);} > 0 ? : |
148
|
0 |
1 |
unless @_ |
159
|
0 |
2 |
if ($detail) { } |
160
|
0 |
0 |
if &first(sub {
$_->{'pid'} == $res->{'pid'};
}
, @allres) |
162
|
0 |
2 |
if &first(sub {
$_ == $res;
}
, @allres) |
172
|
0 |
2 |
unless @_ |
181
|
2 |
2 |
unless (@allres) |
189
|
0 |
0 |
&first(sub {
$p->{'pid'} == $_->{'pid'};
}
, @$res) ? : |
|
1 |
3 |
&first(sub {
$p == $_;
}
, @$res) ? : |
|
0 |
4 |
$detail ? : |