| line |
true |
false |
branch |
|
128
|
255 |
169 |
if (blessed $original) { } |
|
|
104 |
65 |
elsif (not ref $original) { } |
|
|
65 |
0 |
elsif (ref $original eq ref {}) { } |
|
133
|
1 |
103 |
if ($original->can('instance')) { } |
|
143
|
51 |
14 |
if (1 == keys %$original and not join('', keys %$original) =~ /^[a-z_]/) |
|
148
|
0 |
65 |
unless defined $class |
|
152
|
5 |
58 |
$class->can('instance') ? : |
|
154
|
5 |
58 |
ref $args eq ref [] ? : |
|
|
63 |
1 |
defined $args ? : |
|
167
|
0 |
83 |
unless defined $arrayref |
|
170
|
19 |
64 |
unless ref $arrayref and ref $arrayref eq ref [] |
|
215
|
1 |
0 |
if @results |
|
279
|
7 |
2 |
if (ref $orig eq ref {}) { } |
|
283
|
9 |
296 |
if (is_single_key_hash($got, 'alias')) { } |
|
284
|
5 |
4 |
if $i > 1 |
|
329
|
0 |
0 |
if (is_single_key_hash($got, 'alias')) |
|
352
|
10 |
52 |
if defined $key and ref $got eq ref {} and 1 == scalar keys %$got and $key eq [keys %$got]->[0] |
|
357
|
1 |
3 |
if not defined $key and ref $got eq ref {} and 1 == scalar keys %$got |