Branch Coverage

blib/lib/Devel/Caller.pm
Criterion Covered Total %
branch 44 80 55.0


line true false branch
18 44 8 unless $cx
29 0 47 unless $op->name =~ /^(?:pushmark|padrange)$/
34 0 313 if $DEBUG
35 97 216 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 224 if $DEBUG
71 0 224 if ($op->name eq "padrange")
82 0 0 if $DEBUG
86 0 224 if ($op->name =~ /padsv_store/) { }
50 174 elsif ($op->name =~ /pad(sv|av|hv)/) { }
23 151 elsif ($op->name =~ /gvsv|rv2(av|hv|gv)/) { }
6 145 elsif ($op->name eq 'const') { }
92 0 0 if $DEBUG
93 0 0 if ($want_names) { }
102 6 44 if ($op->next->next->name eq 'sassign') { }
0 44 elsif ($op->next->name eq 'padsv_store') { }
103 0 6 if $DEBUG
106 0 0 if $DEBUG
110 0 44 if $DEBUG
111 41 3 if ($want_names) { }
120 0 23 if ($op->next->next->name eq "sassign")
121 0 0 if $DEBUG
125 6 17 $op->name eq 'gvsv' ? :
128 0 23 if (ref $consider eq 'B::PADOP') { }
129 0 0 if $DEBUG
131 0 0 if $DEBUG
137 0 23 if $DEBUG
140 20 3 if ($want_names) { }
163 3 3 if ($op->next->next->name eq 'sassign') { }
0 3 elsif ($op->next->name eq 'padsv_store') { }
164 0 3 if $DEBUG
167 0 0 if $DEBUG
171 3 0 $want_names ? :
183 0 3 if $DEBUG
184 0 3 unless $op->name eq "pushmark"
187 0 6 if $DEBUG
188 2 4 if $op->name =~ /^method(?:_named)?$/