blib/lib/Test/Unit/Assertion/CodeRef.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 10 | 80.0 |
line | true | false | branch |
---|---|---|---|
14 | 0 | 31 | unless ref $code eq 'CODE' |
22 | 2 | 193 | if (ref $possible_object and ref $possible_object ne 'Regexp' and eval { do { $possible_object->isa('UNIVERSAL') } }) { } |
30 | 146 | 254 | unless $_ |
31 | 192 | 1 | @_ ? : |
39 | 199 | 0 | if (eval 'require B::Deparse') { } |