| line |
true |
false |
branch |
|
32
|
1 |
0 |
if $obsolete_behavior eq 'skip' |
|
148
|
0 |
6 |
unless my $global_catalog_name = delete $arg{'name'} |
|
152
|
0 |
6 |
unless defined $arg{'list'} |
|
161
|
18 |
27 |
if ref $self |
|
178
|
0 |
17 |
unless defined $catalog_info{$target_class} |
|
231
|
0 |
17 |
unless defined $slot_name |
|
238
|
0 |
17 |
unless defined $$slist{$slot_name} |
|
244
|
17 |
0 |
wantarray ? : |
|
259
|
0 |
31 |
unless @_ |
|
265
|
0 |
32 |
unless (defined $$clist{$catalog_name}) |
|
267
|
0 |
0 |
if ($support_legacy) { } |
|
294
|
119 |
167 |
if $c{$c} |
|
296
|
117 |
115 |
if scalar keys %isect |
|
300
|
27 |
4 |
wantarray ? : |
|
355
|
0 |
4 |
unless defined $$self{'class_catalog'} |
|
381
|
0 |
4 |
unless defined $slot_name |
|
383
|
0 |
4 |
unless defined $catalog_name |
|
387
|
1 |
3 |
ref $catalog_name ? : |
|
390
|
1 |
4 |
if (not defined $$self{'catalog_list'}{$_}) |
|
392
|
1 |
0 |
if ($support_legacy) { } |
|
426
|
0 |
1 |
unless defined $slot_name |
|
443
|
1 |
0 |
ref $catalog ? : |
|
455
|
0 |
54 |
if $meth eq 'DESTROY' |
|
476
|
7 |
2 |
ref $slot ? : |
|
477
|
2 |
7 |
ref $cat ? : |
|
520
|
1 |
17 |
ref $catalog ? : |
|
546
|
0 |
33 |
unless defined $catalog_name |
|
606
|
0 |
7 |
unless defined $result |
|
608
|
1 |
2 |
ref $result eq 'HASH' ? : |
|
|
3 |
4 |
wantarray ? : |