| blib/lib/Tie/Constrained.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 16 | 43.7 |
| line | true | false | branch |
|---|---|---|---|
| 327 | 0 | 6 | $VERBOSE ? : |
| 338 | 0 | 0 | $VERBOSE ? : |
| 398 | 0 | 4 | ref $_[0] ne 'CODE' ? : |
| 401 | 0 | 1 | $out ? : |
| 2 | 2 | if defined $val | |
| 413 | 3 | 0 | $$self{'test'}($value) || $$self{'fail'}($$self{'test'}, $value, 22) ? : |
| 423 | 0 | 8 | if $STRICT and not &{$$self{'test'};}($$self{'value'}) |
| 434 | 0 | 0 | unless $_[1]->isa('Tie::Constrained') |