line |
true |
false |
branch |
28
|
1 |
47 |
if (ref $_[0]) |
41
|
25 |
22 |
if (ref $ref eq 'CODE') { } |
|
21 |
1 |
elsif (my $class = &blessed($ref)) { } |
51
|
1 |
20 |
if ref $method |
53
|
2 |
18 |
unless $class->can($method) |
63
|
2 |
41 |
if @_ |
76
|
18 |
2 |
if (my $object = $self->{'object'}) |
77
|
10 |
8 |
if (my $function = $object->can($method)) { } |
|
7 |
1 |
elsif ($object->can('AUTOLOAD')) { } |
92
|
3 |
4 |
if (wantarray) { } |
|
3 |
1 |
elsif (defined wantarray) { } |
130
|
1 |
43 |
if ($self->{'dismissed'}) { } |
|
24 |
19 |
elsif ($self->{'code'}) { } |
|
16 |
3 |
elsif (my $object = $self->{'object'}) { } |
159
|
7 |
3 |
if $self->{'object'} |