| line |
true |
false |
branch |
|
28
|
13 |
6 |
if (defined $glob and not ref $glob and length $glob) |
|
34
|
17 |
3 |
if (ref $glob eq 'GLOB') |
|
35
|
6 |
11 |
if (defined(my $io = *{$glob;}{'IO'})) |
|
49
|
5 |
6 |
&blessed($object_or_filehandle) ? : |
|
53
|
4 |
3 |
if (defined $class) { } |
|
63
|
4 |
0 |
&blessed($object_or_filehandle) ? : |
|
67
|
4 |
0 |
if (defined $class_or_role) { } |
|
83
|
1 |
27 |
if (&blessed($inv)) { } |
|
92
|
13 |
14 |
if (not ref $inv and defined $inv and length $inv and do {
no strict 'refs';
scalar keys %{$inv . '::';}
}) { } |
|
102
|
9 |
4 |
if (defined $class_or_role) { } |
|
121
|
2 |
14 |
&blessed($obj) ? : |
|
126
|
4 |
3 |
unless &obj_can($inv, $method) |