| line |
true |
false |
branch |
|
23
|
5 |
18 |
if (@options and &blessed($options[0]) and $options[0]->isa("Callable")) |
|
39
|
1 |
4 |
if (@options) { } |
|
52
|
9 |
18 |
if (@_ > 1) |
|
56
|
18 |
9 |
if (wantarray) |
|
57
|
9 |
9 |
unless exists $self->{'__first_arg'} |
|
67
|
18 |
17 |
unless (exists $self->{'__handler'}) |
|
80
|
7 |
9 |
$ref eq 'ARRAY' ? : |
|
|
2 |
16 |
$ref eq 'CODE' ? : |
|
88
|
12 |
6 |
if (@args) |
|
101
|
6 |
1 |
unless (&blessed($object)) |
|
104
|
0 |
6 |
if defined $garbage |
|
120
|
0 |
9 |
if @path > 2 |
|
122
|
2 |
7 |
if (@path == 2) |
|
130
|
4 |
5 |
if (@path == 1) |
|
137
|
0 |
9 |
unless $handler |
|
159
|
0 |
18 |
unless @{$self->{'options'};} |
|
163
|
0 |
16 |
unless $ref eq "CODE" or $ref eq "ARRAY" or $ref eq "" |
|
165
|
7 |
11 |
if ($ref eq "ARRAY") |
|
166
|
0 |
7 |
if @{$source;} < 2 |
|
167
|
0 |
7 |
unless &blessed($source->[0]) or ref $source->[0] eq "" |
|
168
|
0 |
7 |
if ref $source->[1] |