| line |
true |
false |
branch |
|
29
|
0 |
0 |
unless ($CACHE and $_table_res) |
|
44
|
0 |
30 |
if @unknown_args |
|
61
|
8 |
110 |
if (defined $args{'pid'}) |
|
62
|
7 |
1 |
unless $$p{'pid'} == $args{'pid'} |
|
64
|
12 |
99 |
if (defined $args{'name'}) |
|
65
|
4 |
8 |
if (ref $args{'name'} eq 'Regexp') { } |
|
66
|
3 |
1 |
unless $$p{'name'} =~ /$args{'name'}/ |
|
68
|
7 |
1 |
unless $$p{'name'} eq $args{'name'} |
|
71
|
12 |
89 |
if (defined $args{'cmndline'}) |
|
72
|
4 |
8 |
if (ref $args{'cmndline'} eq 'Regexp') { } |
|
73
|
3 |
1 |
unless $$p{'cmndline'} =~ /$args{'cmndline'}/ |
|
75
|
7 |
1 |
unless $$p{'cmndline'} eq $args{'cmndline'} |
|
78
|
28 |
63 |
if (defined $args{'exec'}) |
|
80
|
20 |
8 |
unless ($args{'exec'} =~ m[/]) |
|
83
|
23 |
5 |
unless $exec eq $args{'exec'} |
|
85
|
22 |
46 |
if (defined $args{'user'} or defined $args{'uid'}) |
|
88
|
22 |
0 |
if ($val =~ /\A\d+\z/) { } |
|
91
|
0 |
0 |
unless (defined $arg_uid) |
|
93
|
0 |
0 |
@pw ? : |
|
97
|
15 |
7 |
unless $$p{'uid'} == $uid |
|
99
|
28 |
25 |
if (defined $args{'euser'} or defined $args{'euid'}) |
|
102
|
28 |
0 |
if ($val =~ /\A\d+\z/) { } |
|
105
|
0 |
0 |
unless (defined $arg_euid) |
|
107
|
0 |
0 |
@pw ? : |
|
111
|
17 |
11 |
unless $$p{'euid'} == $euid |
|
117
|
0 |
118 |
if $args{'inverse'} |
|
118
|
82 |
36 |
unless $cond |
|
120
|
4 |
32 |
if ($args{'detail'}) { } |
|
126
|
1 |
35 |
if (defined $args{'result_max'}) |
|
127
|
1 |
0 |
if @res >= $args{'result_max'} |
|
135
|
1 |
1 |
@{find_proc(@_, 'result_max', 1);} > 0 ? : |
|
139
|
0 |
1 |
unless @_ |
|
150
|
0 |
2 |
if ($detail) { } |
|
151
|
0 |
0 |
if first sub {
$$_{'pid'} == $$res{'pid'};
}
, @allres |
|
153
|
0 |
2 |
if first sub {
$_ == $res;
}
, @allres |
|
163
|
0 |
2 |
unless @_ |
|
172
|
2 |
2 |
unless (@allres) |
|
180
|
0 |
0 |
first(sub {
$$p{'pid'} == $$_{'pid'};
}
, @$res) ? : |
|
|
1 |
3 |
first(sub {
$p == $_;
}
, @$res) ? : |
|
|
0 |
4 |
$detail ? : |