Branch Coverage

blib/lib/Proc/Find.pm
Criterion Covered Total %
branch 70 98 71.4


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 ? :