| line |
true |
false |
branch |
|
229
|
23 |
1 |
if (scalar @_) |
|
232
|
20 |
3 |
if (UNIVERSAL::isa($initializer, 'Data::MultiValuedHash') or ref $initializer eq 'HASH') { } |
|
262
|
2 |
0 |
unless ref $clone eq ref $self |
|
291
|
4 |
23 |
if (defined(my $new_value = CORE::shift @_)) |
|
294
|
1 |
3 |
if (not $old_value and $new_value) |
|
316
|
2 |
0 |
wantarray ? : |
|
347
|
2 |
0 |
wantarray ? : |
|
380
|
4 |
5 |
$$self{$KEY_CASE_INSE} ? : |
|
381
|
1 |
8 |
unless defined $key |
|
398
|
0 |
4 |
$$self{$KEY_CASE_INSE} ? : |
|
399
|
1 |
3 |
unless defined $key |
|
400
|
2 |
2 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
418
|
3 |
12 |
$$self{$KEY_CASE_INSE} ? : |
|
419
|
1 |
14 |
unless defined $key |
|
420
|
2 |
13 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
439
|
1 |
36 |
$$self{$KEY_CASE_INSE} ? : |
|
440
|
3 |
34 |
unless defined $key |
|
441
|
0 |
4 |
wantarray ? : |
|
|
4 |
33 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
444
|
10 |
23 |
if (defined $_[0]) |
|
446
|
4 |
6 |
ref $_[0] eq 'ARRAY' ? : |
|
451
|
0 |
33 |
wantarray ? : |
|
475
|
10 |
9 |
if (defined $_[0]) |
|
478
|
0 |
19 |
wantarray ? : |
|
498
|
0 |
4 |
wantarray ? : |
|
518
|
0 |
4 |
wantarray ? : |
|
542
|
25 |
32 |
if (defined $_[0]) |
|
545
|
23 |
34 |
if (defined $_[2]) |
|
546
|
8 |
15 |
ref $_[2] eq 'ARRAY' ? : |
|
552
|
0 |
57 |
wantarray ? : |
|
591
|
0 |
2 |
$$self{$KEY_CASE_INSE} ? : |
|
614
|
0 |
4 |
$$self{$KEY_CASE_INSE} ? : |
|
615
|
2 |
2 |
ref $_[0] eq 'ARRAY' ? : |
|
639
|
19 |
2 |
ref $_[0] eq 'HASH' ? : |
|
|
3 |
21 |
UNIVERSAL::isa($_[0], 'Data::MultiValuedHash') ? : |
|
643
|
47 |
46 |
ref $new{$key} eq 'ARRAY' ? : |
|
644
|
40 |
53 |
if $case_inse |
|
664
|
0 |
5 |
$$self{$KEY_CASE_INSE} ? : |
|
665
|
1 |
4 |
unless defined $key |
|
666
|
2 |
3 |
ref $_[0] eq 'ARRAY' ? : |
|
686
|
0 |
1 |
$$self{$KEY_CASE_INSE} ? : |
|
687
|
0 |
1 |
ref $_[0] eq 'ARRAY' ? : |
|
706
|
0 |
2 |
$$self{$KEY_CASE_INSE} ? : |
|
707
|
1 |
1 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
724
|
0 |
2 |
$$self{$KEY_CASE_INSE} ? : |
|
725
|
0 |
2 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
745
|
0 |
6 |
$$self{$KEY_CASE_INSE} ? : |
|
748
|
1 |
5 |
ref $_[0] eq 'ARRAY' ? : |
|
753
|
3 |
3 |
defined $length ? : |
|
754
|
0 |
6 |
wantarray ? : |
|
770
|
0 |
2 |
$$self{$KEY_CASE_INSE} ? : |
|
771
|
0 |
1 |
wantarray ? : |
|
|
1 |
1 |
unless exists $$self{$KEY_MAIN_HASH}{$key} |
|
774
|
0 |
1 |
wantarray ? : |
|
792
|
0 |
2 |
wantarray ? : |
|
815
|
1 |
0 |
ref $_[0] eq 'ARRAY' ? : |
|
817
|
1 |
0 |
wantarray ? : |
|
832
|
13 |
22 |
ref $ra_keys ne 'ARRAY' ? : |
|
|
0 |
35 |
UNIVERSAL::isa($ra_keys, 'Data::MultiValuedHash') ? : |
|
|
0 |
35 |
ref $ra_keys eq 'HASH' ? : |
|
836
|
11 |
46 |
$case_inse ? : |
|
837
|
9 |
26 |
if (CORE::shift @_) { } |
|
838
|
25 |
20 |
!$spec_keys{$_} ? : |
|
841
|
36 |
97 |
$spec_keys{$_} ? : |