blib/lib/Swagger2.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 25 | 27 | 92.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
61 | 15 | 2 | 4 | $needle->{'path'} and $needle->{'path'} ne $path |
65 | 16 | 1 | 7 | $needle->{'tag'} and not grep({$needle->{'tag'} eq $_;} @{[] unless $object->{'tags'};}) |
66 | 15 | 1 | 1 | $needle->{'method'} and $needle->{'method'} ne $method |
67 | 8 | 2 | 6 | $needle->{'operationId'} and $needle->{'operationId'} ne $object->{'operationId'} |
126 | 103 | 17 | 0 | ref $_[0] and not &Scalar::Util::blessed($_[0]) |
line | l | !l | condition |
---|---|---|---|
56 | 6 | 1 | $needle ||= {} |
99 | 1 | 3 | $namespace ||= 'http://127.0.0.1/#' |
114 | 1 | 1 | shift() || 'json' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
91 | 88 | 7 | 52 | $self->{'url'} ||= $url |
127 | 10 | 0 | 110 | not $_[0] or $_[0] =~ /^(n|false|off)/i |