Branch Coverage

blib/lib/Devel/Caller.pm
Criterion Covered Total %
branch 43 66 65.1


line true false branch
18 44 8 unless $cx
29 0 47 unless $op->name =~ /^(?:pushmark|padrange)$/
34 0 289 if $DEBUG
35 97 192 if ($op->name eq 'pushmark' or $op->name eq 'padrange') { }
36 0 97 if $DEBUG
54 3 44 $cv ? :
58 0 47 if $DEBUG
60 0 47 if $DEBUG
69 0 216 if $DEBUG
71 24 192 if ($op->name eq 'padrange')
82 0 24 if $DEBUG
86 50 166 if ($op->name =~ /pad(sv|av|hv)/) { }
23 143 elsif ($op->name =~ /gvsv|rv2(av|hv|gv)/) { }
6 137 elsif ($op->name eq 'const') { }
87 6 44 if ($op->next->next->name eq 'sassign')
88 0 6 if $DEBUG
92 0 44 if $DEBUG
93 41 3 if ($want_names) { }
102 0 23 if ($op->next->next->name eq 'sassign')
103 0 0 if $DEBUG
107 6 17 $op->name eq 'gvsv' ? :
110 0 23 if (ref $consider eq 'B::PADOP') { }
111 0 0 if $DEBUG
113 0 0 if $DEBUG
119 0 23 if $DEBUG
122 20 3 if ($want_names) { }
145 3 3 if ($op->next->next->name eq 'sassign')
146 0 3 if $DEBUG
150 3 0 $want_names ? :
162 0 3 if $DEBUG
163 0 3 unless $op->name eq 'pushmark'
166 0 6 if $DEBUG
167 2 4 if $op->name =~ /^method(?:_named)?$/