| line |
true |
false |
branch |
|
83
|
156 |
104 |
if (blessed $original) { } |
|
|
64 |
40 |
elsif (not ref $original) { } |
|
|
40 |
0 |
elsif (ref $original eq ref {}) { } |
|
88
|
1 |
63 |
if ($original->can('instance')) { } |
|
98
|
28 |
12 |
if (1 == keys %$original and not join('', keys %$original) =~ /^[a-z_]/) |
|
102
|
0 |
40 |
unless defined $class |
|
104
|
5 |
33 |
$class->can('instance') ? : |
|
105
|
6 |
33 |
ref $args eq ref [] ? : |
|
|
39 |
1 |
defined $args ? : |
|
118
|
0 |
59 |
unless defined $arrayref |
|
120
|
18 |
41 |
unless ref $arrayref and ref $arrayref eq ref [] |
|
164
|
1 |
0 |
if @results |
|
223
|
5 |
2 |
if (ref $orig eq ref {}) { } |
|
227
|
8 |
172 |
if (is_single_key_hash($got, 'alias')) { } |
|
228
|
4 |
4 |
if $i > 1 |
|
272
|
0 |
0 |
if (is_single_key_hash($got, 'alias')) |
|
293
|
9 |
29 |
if defined $key and ref $got eq ref {} and 1 == scalar keys %$got and $key eq [keys %$got]->[0] |
|
294
|
1 |
3 |
if not defined $key and ref $got eq ref {} and 1 == scalar keys %$got |