| blib/lib/JSON/Schema/Shorthand.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 20 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 10 | 12 | unless (ref $object) |
| 22 | 1 | 9 | '#' eq substr($object, 0, 1) ? : |
| 25 | 2 | 20 | if (my $array = delete $object->{'array'}) |
| 28 | 1 | 1 | ref $array eq 'ARRAY' ? : |
| 33 | 2 | 20 | if (my $props = delete $object->{'object'}) |
| 40 | 40 | 4 | unless $object->{$keyword} |
| 46 | 63 | 3 | unless $object->{$keyword} |
| 54 | 21 | 1 | unless $object->{$keyword} |
| 59 | 3 | 19 | if ($object->{'properties'}) |
| 65 | 1 | 2 | if @required |