| line |
true |
false |
branch |
|
33
|
1 |
11 |
unless UNIVERSAL::isa($newhash, 'HASH') |
|
45
|
77 |
73 |
if exists $$_{$key} |
|
63
|
0 |
0 |
if exists $$_{$key} |
|
78
|
0 |
0 |
if exists $$_{$key} |
|
108
|
3 |
12 |
if ($i == @keys - 1) { } |
|
121
|
0 |
2 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
135
|
0 |
1 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
146
|
0 |
16 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
148
|
0 |
16 |
unless UNIVERSAL::isa($addhash, 'HASH') |
|
156
|
0 |
9 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
159
|
5 |
4 |
if not @$obj |
|
166
|
0 |
2 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
168
|
0 |
2 |
unless UNIVERSAL::isa($addhash, 'HASH') |
|
176
|
0 |
4 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
179
|
2 |
2 |
if not @$obj |
|
185
|
0 |
1 |
unless $obj and $obj->isa('Tie::Hash::Stack') |
|
193
|
0 |
7 |
unless $obj and $obj->isa('Tie::Hash::Stack') |