| line |
true |
false |
branch |
|
24
|
3 |
2 |
if $arg eq 'isa' |
|
25
|
2 |
3 |
if $arg eq 'verbose' |
|
34
|
4 |
611 |
if $_recursing |
|
43
|
4 |
607 |
unless defined $invocant |
|
44
|
587 |
20 |
if &Scalar::Util::blessed($invocant) |
|
45
|
11 |
9 |
if ref $invocant |
|
46
|
1 |
8 |
unless $invocant |
|
52
|
1 |
4 |
if $verbose_warning |
|
61
|
595 |
0 |
if (my $override = eval {
do {
$_[0]->can('isa')
}
}) |
|
63
|
16 |
579 |
unless ($override == \&UNIVERSAL::isa) |
|
71
|
4 |
575 |
if $verbose_warning |
|
77
|
5 |
6 |
if $verbose_warning |
|
85
|
6 |
20 |
$extra ? : |
|
87
|
24 |
2 |
if (warnings::enabled()) |
|
90
|
0 |
24 |
if ((caller 3)[3] || '') =~ /::isa$/ |
|
92
|
0 |
24 |
if ((caller 3)[0] || '') =~ /^Test::Builder/ |
|
93
|
0 |
24 |
if ((caller 2)[0] || '') =~ /^Test::Stream/ |