Branch Coverage

blib/lib/Want.pm
Criterion Covered Total %
branch 67 74 90.5


line true false branch
31 17 137 if ($arg =~ /^\d+$/) { }
6 131 elsif (lc $arg eq 'infinity') { }
2 129 elsif ($arg eq 'REF') { }
26 103 elsif ($reftype{$arg}) { }
3 100 elsif ($arg eq 'REFSCALAR') { }
15 85 elsif ($arg eq 'LVALUE') { }
7 78 elsif ($arg eq 'RVALUE') { }
4 74 elsif ($arg eq 'VOID') { }
11 63 elsif ($arg eq 'SCALAR') { }
47 16 elsif ($arg eq 'BOOL' or $arg eq 'BOOLEAN') { }
11 5 elsif ($arg eq 'LIST') { }
0 5 elsif ($arg eq 'COUNT') { }
5 0 elsif ($arg eq 'ASSIGN') { }
78 12 152 if (@_ == 1 and $_[0] eq 'ASSIGN')
90 0 247 if ($p eq 'return' or $p eq '(none)' and $r =~ /^leavesub(lv)?$/) { }
105 132 20 if (1 == @args)
107 5 127 if $args[0] eq 'REF'
108 15 112 if $args[0] eq 'COUNT'
109 0 112 if $args[0] eq 'ASSIGN'
113 28 126 if ($arg =~ /^!(.*)/) { }
114 6 22 if _wantone(2 + $level, $1)
117 52 74 unless _wantone(2 + $level, $arg)
127 13 5 $count < 0 ? :
133 16 154 if ($n eq 'rv2av') { }
18 136 elsif ($n eq 'rv2hv') { }
9 127 elsif ($n eq 'rv2cv' or $n eq 'entersub') { }
2 125 elsif ($n eq 'rv2gv' or $n eq 'gelem') { }
1 124 elsif ($n eq 'rv2sv') { }
2 122 elsif ($n eq 'method_call') { }
5 117 elsif ($n eq 'multideref') { }
161 5 12 unless &want_lvalue($uplevel)
163 8 4 if (want('BOOL')) { }
167 4 0 want('SCALAR') ? :
4 0 $r ? :
174 1 3 if (&want_lvalue(1))
188 1 4 unless (&want_lvalue(1) and &want_assign(1))
201 4 0 if ($] >= 5.019)