line |
true |
false |
branch |
53
|
0 |
8 |
unless $$arg{$required} |
60
|
0 |
4 |
if exists $callbacks{$code} |
64
|
12 |
3 |
unless /^\$(self|req|rsp)$/ |
70
|
0 |
4 |
unless (@persistent) |
89
|
1 |
29 |
if ($var_name eq '_b_self') |
94
|
2 |
27 |
if ($var_name eq '_b_req') |
95
|
1 |
1 |
unless $b_self |
99
|
2 |
27 |
if ($var_name eq '_b_rsp') |
100
|
0 |
2 |
unless $b_self |
104
|
5 |
24 |
if ($var_name eq '$self') |
105
|
1 |
4 |
unless $b_self |
110
|
3 |
21 |
if ($var_name eq '_b_rsp_id') |
111
|
1 |
2 |
unless $b_rsp |
116
|
3 |
18 |
if ($var_name eq '_b_req_id') |
117
|
1 |
2 |
unless $b_req |
122
|
1 |
17 |
if ($var_name eq '$req') |
123
|
1 |
0 |
unless $b_req |
128
|
1 |
16 |
if ($var_name eq '$rsp') |
129
|
1 |
0 |
unless $b_rsp |
134
|
4 |
12 |
unless $var_name =~ /^([\$\@\%])(req|rsp|arg|self)_(\S+)/ |
141
|
6 |
6 |
if ($prefix eq 'arg') |
150
|
2 |
4 |
if ($sigil eq '$') |
158
|
2 |
2 |
if ($sigil eq '@') |
166
|
2 |
0 |
if ($sigil eq '%') |
178
|
2 |
4 |
if ($sigil eq '$') { } |
|
2 |
2 |
elsif ($sigil eq '@') { } |
|
2 |
0 |
elsif ($sigil eq '%') { } |
191
|
3 |
3 |
if ($prefix eq 'req') |
192
|
3 |
0 |
unless $b_req |
213
|
3 |
0 |
if ($prefix eq 'rsp') |
214
|
3 |
0 |
unless $b_rsp |
215
|
3 |
0 |
unless $b_self |
236
|
0 |
0 |
if ($prefix eq 'self') |
237
|
0 |
0 |
unless $b_self |
272
|
0 |
4 |
if ($@) |
303
|
0 |
4 |
unless exists $callbacks{$self} |
316
|
0 |
0 |
if *{$cb_name;}{'CODE'} == $callbacks{$callback}[0] |
319
|
0 |
1 |
if (@leaks) |