Branch Coverage

lib/Wanted.pm
Criterion Covered Total %
branch 90 102 88.2


line true false branch
41 0 346 unless (defined $p)
46 30 316 if ($p eq 'return' or $p eq '(none)' and $r =~ /^leavesub(lv)?$/) { }
61 1 10 unless defined $gimme
63 7 3 if ($ref_type) { }
1 2 elsif (&want_boolean(bump_level(1))) { }
0 2 elsif (not !wantassign(2)) { }
1 1 elsif ($gimme) { }
1 0 elsif ($gimme == 0) { }
65 1 6 $ref_type eq 'SCALAR' ? :
97 0 18 unless defined $level
99 13 5 $count < 0 ? :
104 13 196 if (@_ == 1 and $_[0] eq "ASSIGN")
116 171 25 if (1 == @args)
119 5 166 if $args[0] eq "REF"
120 15 151 if $args[0] eq "COUNT"
121 0 151 if $args[0] eq "ASSIGN"
127 29 171 if (substr($arg, 0, 1) eq "!")
134 3 197 unless defined $result
135 87 110 if not $is_neg || $result or $is_neg and $result
143 7 14 unless &want_lvalue($uplevel)
145 9 5 if (want('BOOL')) { }
151 4 1 want('SCALAR') ? :
5 0 $r ? :
159 0 226 unless defined $level
161 0 226 unless defined $n
162 16 210 if ($n eq 'rv2av') { }
18 192 elsif ($n eq 'rv2hv') { }
11 181 elsif ($n eq 'rv2cv' or $n eq 'entersub') { }
4 177 elsif ($n eq 'rv2gv' or $n eq 'gelem') { }
2 175 elsif ($n eq 'rv2sv') { }
3 172 elsif ($n eq 'method_call') { }
7 165 elsif ($n eq 'multideref') { }
190 7 0 if ($] >= "5.022")
204 3 12 if (&want_lvalue(1))
216 3 9 unless (&want_lvalue(1) and &want_assign(1))
221 9 0 if ($] >= "5.019")
233 17 183 if ($arg =~ /^\d+$/) { }
6 177 elsif (lc $arg eq 'infinity') { }
3 174 elsif ($arg eq 'REF') { }
42 132 elsif ($reftype{$arg}) { }
6 126 elsif ($arg eq 'REFSCALAR') { }
19 107 elsif ($arg eq 'LVALUE') { }
7 100 elsif ($arg eq 'RVALUE') { }
4 96 elsif ($arg eq 'VOID') { }
19 77 elsif ($arg eq 'SCALAR') { }
55 22 elsif ($arg eq 'BOOL' or $arg eq 'BOOLEAN') { }
16 6 elsif ($arg eq 'LIST') { }
0 6 elsif ($arg eq 'COUNT') { }
6 0 elsif ($arg eq 'ASSIGN') { }
272 2 17 unless defined $gimme
283 1 15 unless defined $gimme