| line |
true |
false |
branch |
|
85
|
0 |
32 |
&Scalar::Util::blessed(ref $_) ? : |
|
98
|
0 |
0 |
if $@ |
|
115
|
20 |
12 |
if ($old_glob) |
|
117
|
22 |
78 |
if defined *{$old_glob;}{$slot} |
|
121
|
32 |
0 |
wantarray ? : |
|
132
|
27 |
6 |
if $glob |
|
158
|
0 |
22 |
if $DEBUG |
|
194
|
0 |
31 |
if (defined $debug) |
|
196
|
0 |
0 |
if ($debug != $old_debug) |
|
202
|
27 |
4 |
if (new_scope $MYSUBS) { } |
|
206
|
4 |
23 |
if ($restore) { } |
|
237
|
0 |
0 |
if (exists $$restore{$fqname}) { } |
|
238
|
0 |
0 |
unless (xs_glob_eq $$installed{$fqname}[1], $$restore{$fqname}[1]) |
|
239
|
0 |
0 |
if $DEBUG |
|
248
|
0 |
0 |
if $DEBUG |
|
261
|
0 |
4 |
if $DEBUG |
|
273
|
23 |
4 |
if $top_level |
|
290
|
28 |
3 |
if (new_scope $subclass) { } |
|
292
|
4 |
24 |
$temp ? : |
|
301
|
0 |
32 |
unless (_isa $sub, 'CODE') |
|
312
|
3 |
29 |
if (exists $$installed{$fqname}) { } |
|
313
|
0 |
3 |
if $DEBUG |
|
316
|
1 |
28 |
if $DEBUG |
|
339
|
0 |
6 |
unless $^H & 131072 and $unimport = $$hints{$subclass} |
|
342
|
2 |
4 |
@_ ? : |
|
350
|
7 |
0 |
if ($glob) { } |
|
352
|
7 |
0 |
if (&xs_glob_eq($glob, $$installed{$fqname}[1])) { } |
|
356
|
0 |
7 |
if $DEBUG |
|
372
|
6 |
0 |
if ($deleted) |