| line |
true |
false |
branch |
|
16
|
0 |
63 |
unless my $pkg = ref $_[0] |
|
17
|
63 |
0 |
if (blessed($_[0])) { } |
|
25
|
63 |
0 |
if defined $pkg |
|
166
|
1 |
20 |
if ('[NO_DESTROY]' eq $method) |
|
170
|
1 |
19 |
unless ($method =~ /$VALID_METHOD_NAME/) |
|
177
|
9 |
10 |
if ('HASH' eq ref $_[0]) |
|
179
|
5 |
4 |
if exists $$constraints{'default'} |
|
184
|
1 |
8 |
if (my(@keys) = keys %$constraints) |
|
195
|
4 |
14 |
if ($class_data) { } |
|
197
|
0 |
4 |
if (defined $validation_sub) { } |
|
198
|
0 |
0 |
if (exists $default_for{$method}) { } |
|
202
|
0 |
0 |
unless (exists $class_data_for{$class}) |
|
207
|
0 |
0 |
unless (exists $value_for{$method}{$class}) |
|
211
|
0 |
0 |
unless @_ |
|
223
|
0 |
0 |
unless (exists $class_data_for{$class}) |
|
228
|
0 |
0 |
unless @_ |
|
238
|
2 |
2 |
if (exists $default_for{$method}) { } |
|
242
|
5 |
21 |
unless (exists $class_data_for{$class}) |
|
247
|
3 |
18 |
unless (exists $value_for{$method}{$class}) |
|
251
|
17 |
4 |
unless @_ |
|
261
|
0 |
2 |
unless (exists $class_data_for{$class}) |
|
266
|
1 |
1 |
unless @_ |
|
274
|
1 |
13 |
if (defined $validation_sub) { } |
|
275
|
0 |
1 |
if (exists $default_for{$method}) { } |
|
279
|
0 |
0 |
unless (exists $value_for{$method}{$instance}) |
|
283
|
0 |
0 |
unless @_ |
|
294
|
3 |
3 |
unless @_ |
|
303
|
3 |
10 |
if (exists $default_for{$method}) { } |
|
307
|
5 |
2 |
unless (exists $value_for{$method}{$instance}) |
|
311
|
6 |
1 |
unless @_ |
|
320
|
9 |
9 |
unless @_ |
|
328
|
10 |
1 |
unless ($no_destroy_for{$calling_package}) |
|
461
|
14 |
0 |
if (@methods) |
|
472
|
15 |
0 |
if blessed $object |
|
482
|
2 |
17 |
if (not exists $methods_for{$package}) { } |
|
484
|
1 |
12 |
if (exists $$instance_hash{$instance}) |
|
501
|
1 |
3 |
unless exists $value_for{$fq_method}{$_refaddr} |
|
519
|
1 |
3 |
unless (defined $package) |
|
522
|
1 |
3 |
unless $methods_for{$package} |
|
544
|
1 |
1 |
unless (defined $package) |
|
547
|
0 |
2 |
unless $methods_for{$package} |
|
602
|
1 |
0 |
if (@methods) |