| line |
true |
false |
branch |
|
34
|
0 |
1 |
unless ($function =~ /^GLOBAL_(.*)$/) |
|
46
|
6 |
1 |
@_ ? : |
|
55
|
0 |
15 |
unless (defined $class) |
|
58
|
0 |
15 |
if defined $Devel::Leak::Object::IGNORE_CLASS{$class} |
|
60
|
2 |
13 |
if ($Devel::Leak::Object::TRACKED{$address}) |
|
62
|
0 |
2 |
if ($class eq $Devel::Leak::Object::TRACKED{$address}{'class'}) { } |
|
76
|
3 |
12 |
if ($package eq $class) |
|
78
|
2 |
1 |
if ($next_subroutine eq $class . '::new') |
|
85
|
11 |
4 |
unless ($Devel::Leak::Object::DESTROY_STUBBED{$class}) |
|
86
|
0 |
11 |
if (exists ${$class . '::';}{'DESTROY'} and *{$class . '::DESTROY';}{'CODE'}) |
|
91
|
0 |
4 |
unless (defined $class) |
|
|
0 |
4 |
unless (defined $class) |
|
|
0 |
3 |
if ($class ne $original) |
|
|
0 |
3 |
if ($Devel::Leak::Object::OBJECT_COUNT{$original} < 0) |
|
|
0 |
3 |
if ($Devel::Leak::Object::DESTROY_ORIGINAL{$original}) |
|
|
3 |
1 |
if ($original) { } |
|
|
1 |
3 |
unless ($Devel::Leak::Object::DESTROY_NEXT{$original}) |
|
|
0 |
4 |
unless (defined $super or defined $Devel::Leak::Object::IGNORE_CLASS{$class}) |
|
|
2 |
2 |
if ($super) |
|
|
0 |
4 |
unless (defined $class) |
|
|
0 |
3 |
unless (defined $class) |
|
|
0 |
3 |
if ($class ne $original) |
|
|
0 |
3 |
if ($Devel::Leak::Object::OBJECT_COUNT{$original} < 0) |
|
|
3 |
1 |
if ($Devel::Leak::Object::DESTROY_ORIGINAL{$original}) |
|
|
0 |
4 |
if ($original) { } |
|
|
0 |
4 |
unless ($Devel::Leak::Object::DESTROY_NEXT{$original}) |
|
|
1 |
3 |
unless (defined $super or defined $Devel::Leak::Object::IGNORE_CLASS{$class}) |
|
|
0 |
0 |
if ($super) |
|
|
0 |
0 |
unless (defined $class) |
|
|
0 |
0 |
unless (defined $class) |
|
|
0 |
0 |
if ($class ne $original) |
|
|
0 |
0 |
if ($Devel::Leak::Object::OBJECT_COUNT{$original} < 0) |
|
|
0 |
0 |
if ($Devel::Leak::Object::DESTROY_ORIGINAL{$original}) |
|
|
0 |
0 |
if ($original) { } |
|
|
0 |
0 |
unless ($Devel::Leak::Object::DESTROY_NEXT{$original}) |
|
|
0 |
0 |
unless (defined $super or defined $Devel::Leak::Object::IGNORE_CLASS{$class}) |
|
|
0 |
1 |
if ($super) |
|
|
0 |
1 |
unless (defined $class) |
|
|
0 |
1 |
unless (defined $class) |
|
|
0 |
1 |
if ($class ne $original) |
|
|
0 |
1 |
if ($Devel::Leak::Object::OBJECT_COUNT{$original} < 0) |
|
|
1 |
0 |
if ($Devel::Leak::Object::DESTROY_ORIGINAL{$original}) |
|
|
0 |
1 |
if ($original) { } |
|
|
0 |
1 |
unless ($Devel::Leak::Object::DESTROY_NEXT{$original}) |
|
|
0 |
1 |
unless (defined $super or defined $Devel::Leak::Object::IGNORE_CLASS{$class}) |
|
150
|
0 |
11 |
if ($@) |
|
155
|
10 |
1 |
unless ($Devel::Leak::Object::DESTROY_NEXT{$class}) |
|
172
|
0 |
22 |
if $seen{$c}++ |
|
177
|
11 |
11 |
$Devel::Leak::Object::DESTROY_STUBBED{$c} ? : |
|
178
|
2 |
20 |
if ($has_destroy) { } |
|
203
|
0 |
3 |
unless $Devel::Leak::Object::OBJECT_COUNT{$_} |
|
205
|
0 |
3 |
unless $Devel::Leak::Object::OBJECT_COUNT{$_} > $Devel::Leak::Object::OBJECT_COUNT_CHECKPOINT{$_} |
|
207
|
3 |
0 |
unless $first++ |
|
217
|
1 |
14 |
if $_ eq '' |
|
218
|
8 |
6 |
unless $Devel::Leak::Object::OBJECT_COUNT{$_} |
|
221
|
0 |
8 |
if ($Devel::Leak::Object::TRACKSOURCELINES) |
|
226
|
2 |
1 |
unless defined $$obj{'class'} |