Branch Coverage

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


line true false branch
40 0 346 unless (defined $p)
45 30 316 if ($p eq 'return' or $p eq '(none)' and $r =~ /^leavesub(lv)?$/) { }
60 1 10 unless defined $gimme
62 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) { }
64 1 6 $ref_type eq 'SCALAR' ? :
96 0 18 unless defined $level
98 13 5 $count < 0 ? :
103 13 196 if (@_ == 1 and $_[0] eq "ASSIGN")
115 171 25 if (1 == @args)
118 5 166 if $args[0] eq "REF"
119 15 151 if $args[0] eq "COUNT"
120 0 151 if $args[0] eq "ASSIGN"
126 29 171 if (substr($arg, 0, 1) eq "!")
133 3 197 unless defined $result
134 87 110 if not $is_neg || $result or $is_neg and $result
142 7 14 unless &want_lvalue($uplevel)
144 9 5 if (want('BOOL')) { }
150 4 1 want('SCALAR') ? :
5 0 $r ? :
158 0 226 unless defined $level
160 0 226 unless defined $n
161 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') { }
189 7 0 if ($] >= "5.022")
203 3 12 if (&want_lvalue(1))
215 3 9 unless (&want_lvalue(1) and &want_assign(1))
220 9 0 if ($] >= "5.019")
232 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') { }
271 2 17 unless defined $gimme
282 1 15 unless defined $gimme