blib/lib/String/Defer.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 18 | 83.3 |
line | true | false | branch |
---|---|---|---|
120 | 7 | 3 | blessed $val ? : |
10 | 228 | unless ref $val and not blessed $val and $reftypes{reftype $val} | |
143 | 135 | 436 | eval { do { $_[0]->isa('String::Defer') } } ? : |
150 | 0 | 328 | unless my $class = &Scalar::Util::blessed($self) |
154 | 155 | 173 | $reverse ? : |
176 | 2 | 523 | reftype $_ eq 'CODE' ? : |
525 | 365 | ref $_ ? : | |
212 | 0 | 69 | if ref $class |
221 | 69 | 0 | @strs ? : |