blib/lib/DCI/Meta/Context.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 15 | 20 | 75.0 |
line | true | false | branch |
---|---|---|---|
48 | 0 | 212 | unless blessed $context |
51 | 76 | 136 | if (@_) |
53 | 0 | 76 | if @extra |
70 | 26 | 50 | unless defined $cast |
73 | 8 | 42 | if blessed $val and $val->isa($cast) |
77 | 42 | 0 | if eval { do { $cast->isa('DCI::Cast') } } |
96 | 0 | 58 | if $$store{$role} |
101 | 6 | 25 | if ($cast and not blessed $cast and ref $cast eq 'HASH') |
123 | 0 | 32 | unless @_ |
126 | 26 | 6 | @args > 1 ? : |