| line |
true |
false |
branch |
|
24
|
5 |
18 |
if (@options and &blessed($options[0]) and $options[0]->isa("Callable")) |
|
40
|
1 |
4 |
if (@options) { } |
|
53
|
9 |
18 |
if (@_ > 1) |
|
57
|
18 |
9 |
if (wantarray) |
|
58
|
9 |
9 |
unless exists $self->{'__first_arg'} |
|
68
|
18 |
17 |
unless (exists $self->{'__handler'}) |
|
81
|
7 |
9 |
$ref eq 'ARRAY' ? : |
|
|
2 |
16 |
$ref eq 'CODE' ? : |
|
89
|
12 |
6 |
if (@args) |
|
102
|
6 |
1 |
unless (&blessed($object)) |
|
105
|
0 |
6 |
if defined $garbage |
|
123
|
0 |
9 |
if @path > 2 |
|
125
|
2 |
7 |
if (@path == 2) |
|
133
|
4 |
5 |
if (@path == 1) |
|
140
|
0 |
9 |
unless $handler |
|
162
|
0 |
18 |
unless @{$self->{'options'};} |
|
166
|
0 |
16 |
unless $ref eq "CODE" or $ref eq "ARRAY" or $ref eq "" |
|
168
|
7 |
11 |
if ($ref eq "ARRAY") |
|
169
|
0 |
7 |
if @{$source;} < 2 |
|
170
|
0 |
7 |
unless &blessed($source->[0]) or ref $source->[0] eq "" |
|
171
|
0 |
7 |
if ref $source->[1] |