blib/lib/Test/Weaken/ExtraBits.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 12 | 58.3 |
line | true | false | branch |
---|---|---|---|
40 | 0 | 0 | unless ref $ref eq 'GLOB' |
60 | 0 | 0 | if (&Scalar::Util::blessed($ref) and $ref->isa('DBI::dr')) |
71 | 3 | 4 | unless ref $ref eq 'CODE' |
78 | 0 | 4 | if $gv->isa('B::SPECIAL') |
92 | 3 | 6 | unless ref $ref eq 'CODE' |
96 | 4 | 4 | if (defined &$funcname and $ref == \&$funcname) |