| line |
true |
false |
branch |
|
31
|
5 |
2 |
if ($interface eq 'get_set') { } |
|
|
2 |
0 |
elsif ($interface eq 'get_set_init') { } |
|
35
|
5 |
8 |
if @_ > 1 |
|
45
|
4 |
8 |
if @_ > 1 |
|
46
|
4 |
4 |
defined $Scalar{$_[0]}{$name} ? : |
|
73
|
2 |
0 |
if ($interface eq 'get_set') { } |
|
77
|
0 |
34 |
ref $_[0] ? : |
|
79
|
6 |
28 |
if (@_) |
|
84
|
12 |
16 |
if exists $Inheritable_Scalar{$class}{$name} |
|
96
|
16 |
10 |
if (exists $Inheritable_Scalar{$subclass}{$name}) |
|
121
|
4 |
0 |
if ($interface eq 'get_set') { } |
|
125
|
0 |
82 |
ref $_[0] ? : |
|
127
|
18 |
64 |
if (@_) |
|
129
|
12 |
6 |
$_[0] ? : |
|
132
|
30 |
34 |
if exists $Inheritable_Boolean{$class}{$name} |
|
144
|
28 |
20 |
if (exists $Inheritable_Boolean{$subclass}{$name}) |
|
183
|
2 |
12 |
if ($interface eq 'get_set_all') { } |
|
|
2 |
10 |
elsif ($interface eq 'clear') { } |
|
|
0 |
10 |
elsif ($interface eq 'reset') { } |
|
|
2 |
8 |
elsif ($interface eq 'delete') { } |
|
|
2 |
6 |
elsif ($interface eq 'exists') { } |
|
|
2 |
4 |
elsif ($interface =~ /^(?:keys|names)$/) { } |
|
|
2 |
2 |
elsif ($interface eq 'values') { } |
|
|
2 |
0 |
elsif ($interface eq 'get_set') { } |
|
187
|
0 |
10 |
ref $_[0] ? : |
|
190
|
0 |
2 |
unless $Hash{$class}{$key} |
|
|
2 |
4 |
wantarray ? : |
|
|
6 |
4 |
unless @_ |
|
193
|
2 |
2 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
200
|
0 |
2 |
if @_ % 2 |
|
209
|
0 |
0 |
unless $Hash{$class}{$key} |
|
|
0 |
4 |
wantarray ? : |
|
230
|
0 |
2 |
unless @_ > 1 |
|
233
|
0 |
2 |
$interface eq 'manip' ? : |
|
238
|
0 |
2 |
unless @_ == 2 |
|
239
|
2 |
0 |
defined $Hash{$_[0]}{$key} ? : |
|
241
|
0 |
2 |
$interface eq 'manip' ? : |
|
247
|
4 |
0 |
defined $Hash{$_[0]}{$key} ? : |
|
|
0 |
0 |
defined $Hash{$_[0]}{$key} ? : |
|
|
4 |
0 |
wantarray ? : |
|
255
|
4 |
0 |
defined $Hash{$_[0]}{$key} ? : |
|
|
0 |
0 |
defined $Hash{$_[0]}{$key} ? : |
|
|
4 |
0 |
wantarray ? : |
|
262
|
0 |
4 |
ref $_[0] ? : |
|
265
|
0 |
4 |
unless (@_) |
|
267
|
0 |
0 |
defined $Hash{$class}{$key} ? : |
|
|
0 |
0 |
wantarray ? : |
|
271
|
0 |
4 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
278
|
2 |
2 |
if (@_ == 1) |
|
280
|
0 |
2 |
ref $_[0] eq 'ARRAY' ? : |
|
285
|
0 |
2 |
if @_ % 2 |
|
294
|
0 |
0 |
unless $Hash{$class}{$key} |
|
|
0 |
2 |
wantarray ? : |
|
327
|
0 |
14 |
ref $_[0] ? : |
|
339
|
10 |
0 |
if (exists $Inheritable_Hash{$subclass}{$key}) |
|
348
|
2 |
14 |
if ($interface eq 'get_set_all') { } |
|
|
2 |
12 |
elsif ($interface eq 'clear') { } |
|
|
2 |
10 |
elsif ($interface eq 'reset') { } |
|
|
2 |
8 |
elsif ($interface eq 'delete') { } |
|
|
2 |
6 |
elsif ($interface eq 'exists') { } |
|
|
2 |
4 |
elsif ($interface =~ /^(?:keys|names)$/) { } |
|
|
2 |
2 |
elsif ($interface eq 'values') { } |
|
|
2 |
0 |
elsif ($interface eq 'get_set') { } |
|
352
|
0 |
10 |
ref $_[0] ? : |
|
354
|
4 |
6 |
unless defined $Inheritable_Hash{$class}{$key} |
|
357
|
0 |
2 |
unless $Inheritable_Hash{$class}{$key} |
|
|
2 |
4 |
wantarray ? : |
|
|
6 |
4 |
unless @_ |
|
360
|
2 |
2 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
367
|
0 |
2 |
if @_ % 2 |
|
376
|
0 |
0 |
unless $Inheritable_Hash{$class}{$key} |
|
|
0 |
4 |
wantarray ? : |
|
397
|
0 |
4 |
unless @_ > 1 |
|
398
|
0 |
4 |
unless defined $Inheritable_Hash{$_[0]}{$key} |
|
401
|
0 |
2 |
$interface eq 'manip' ? : |
|
406
|
0 |
8 |
unless @_ == 2 |
|
407
|
0 |
8 |
unless defined $Inheritable_Hash{$_[0]}{$key} |
|
408
|
8 |
0 |
defined $Inheritable_Hash{$_[0]}{$key} ? : |
|
410
|
0 |
2 |
$interface eq 'manip' ? : |
|
415
|
10 |
14 |
unless defined $Inheritable_Hash{$_[0]}{$key} |
|
416
|
0 |
24 |
unless $Inheritable_Hash{$_[0]}{$key} |
|
|
0 |
0 |
unless $Inheritable_Hash{$_[0]}{$key} |
|
417
|
24 |
0 |
defined $Inheritable_Hash{$_[0]}{$key} ? : |
|
|
0 |
0 |
defined $Inheritable_Hash{$_[0]}{$key} ? : |
|
|
24 |
0 |
wantarray ? : |
|
424
|
0 |
24 |
unless defined $Inheritable_Hash{$_[0]}{$key} |
|
425
|
0 |
24 |
unless $Inheritable_Hash{$_[0]}{$key} |
|
|
0 |
0 |
unless $Inheritable_Hash{$_[0]}{$key} |
|
426
|
24 |
0 |
defined $Inheritable_Hash{$_[0]}{$key} ? : |
|
|
0 |
0 |
defined $Inheritable_Hash{$_[0]}{$key} ? : |
|
|
24 |
0 |
wantarray ? : |
|
433
|
0 |
6 |
ref $_[0] ? : |
|
435
|
0 |
6 |
unless defined $Inheritable_Hash{$class}{$key} |
|
438
|
0 |
6 |
unless (@_) |
|
440
|
0 |
0 |
unless $Inheritable_Hash{$class}{$key} |
|
|
0 |
0 |
defined $Inheritable_Hash{$class}{$key} ? : |
|
|
0 |
0 |
wantarray ? : |
|
444
|
0 |
6 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
451
|
2 |
4 |
if (@_ == 1) |
|
453
|
0 |
2 |
ref $_[0] eq 'ARRAY' ? : |
|
458
|
0 |
4 |
if @_ % 2 |
|
467
|
0 |
0 |
unless $Inheritable_Hash{$class}{$key} |
|
|
0 |
4 |
wantarray ? : |
|
558
|
4 |
4 |
if defined $add_implies and not ref $add_implies |
|
561
|
4 |
4 |
if defined $delete_implies and not ref $delete_implies |
|
564
|
4 |
4 |
if defined $inherit_implies and not ref $inherit_implies |
|
571
|
142 |
102 |
if ($Inherited_Hash{$name}{$class}[0]{'cache_is_valid'}) |
|
574
|
0 |
142 |
wantarray ? : |
|
589
|
114 |
0 |
if ($superclass->can($cache_method)) { } |
|
|
0 |
0 |
elsif ($superclass->can($keys_method)) { } |
|
593
|
4 |
574 |
unless $$supercache[0] |
|
595
|
166 |
298 |
if $state == 3 |
|
598
|
128 |
170 |
unless (exists $$cache[1]{$attr}) |
|
611
|
0 |
0 |
unless (exists $Inherited_Hash{$name}{$class}[1][1]{$attr}) |
|
626
|
6 |
96 |
unless defined $want |
|
627
|
0 |
96 |
$want ? : |
|
633
|
0 |
216 |
ref $_[0] ? : |
|
634
|
0 |
216 |
unless defined $_[0] |
|
638
|
16 |
200 |
if (@_) { } |
|
640
|
0 |
16 |
if @_ > 1 |
|
645
|
194 |
6 |
if ($Inherited_Hash{$name}{$class}[0]{'cache_is_valid'}) |
|
650
|
178 |
16 |
unless $$cache[0]{$key} == 3 |
|
657
|
6 |
0 |
unless $$cache[0]{$key} == 3 |
|
665
|
0 |
42 |
if ref $class |
|
667
|
42 |
0 |
wantarray ? : |
|
674
|
0 |
48 |
if ref $class |
|
676
|
6 |
42 |
if (@_) |
|
683
|
2 |
40 |
unless $$cache[1] |
|
687
|
20 |
108 |
if $Inherited_Hash{$name}{$class}[1][0]{$k} == 3 |
|
690
|
0 |
42 |
wantarray ? : |
|
695
|
0 |
288 |
ref $_[0] ? : |
|
699
|
0 |
288 |
unless defined $key |
|
701
|
212 |
76 |
if ($Inherited_Hash{$name}{$class}[0]{'cache_is_valid'}) |
|
704
|
144 |
68 |
exists $$cache[1]{$key} && $$cache[0]{$key} != 3 ? : |
|
709
|
68 |
8 |
exists $$cache[1]{$key} && $$cache[0]{$key} != 3 ? : |
|
716
|
0 |
72 |
ref $_[0] ? : |
|
717
|
0 |
72 |
unless @_ |
|
725
|
2 |
70 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
729
|
0 |
6 |
unless defined $attr |
|
736
|
0 |
6 |
if ($add_implies) |
|
749
|
0 |
70 |
if @_ % 2 |
|
758
|
0 |
82 |
unless defined $attr |
|
762
|
28 |
54 |
if ($add_implies) |
|
774
|
72 |
0 |
if ($count) |
|
778
|
90 |
138 |
if ($test_class->isa($class) and $test_class ne $class) |
|
795
|
0 |
8 |
ref $_[0] ? : |
|
797
|
4 |
4 |
unless @keys |
|
805
|
0 |
72 |
ref $_[0] ? : |
|
806
|
0 |
72 |
unless @_ |
|
809
|
6 |
66 |
unless (exists $Inherited_Hash{$name}{$class}) |
|
821
|
0 |
82 |
unless defined $attr |
|
823
|
52 |
30 |
if (exists $$cache[1]{$attr} and $$cache[0]{$attr} != 3) |
|
829
|
32 |
20 |
if ($delete_implies) |
|
839
|
52 |
128 |
if $class eq $test_class |
|
843
|
46 |
20 |
if ($test_class->isa($class) and exists $$test_cache[1]{$attr} and $$test_cache[0]{$attr} == 2) |
|
861
|
0 |
14 |
ref $_[0] ? : |
|
862
|
0 |
14 |
unless @_ |
|
870
|
12 |
2 |
if (exists $$cache[1]{$attr}) |
|
878
|
6 |
8 |
if ($inherit_implies) |
|
890
|
0 |
8 |
if ($interface ne 'all') |