Branch Coverage: lib/OpenAPI/Dispatcher.pm

# Branch Coverage

File: | lib/OpenAPI/Dispatcher.pm
Coverage: | 77.8%

line | % | coverage | branch
--- | --- | --- | ---
55 | 50 | T | F | if ($@)
70 | 50 | T | F | if $url_prefix
73 | 50 | T | F | if ($InitFatal)
81 | 100 | T | F | if ($@)
94 | 50 | T | F | if (not @bits)
104 | 50 | T | F | if ($fst ne '=')
110 | 50 | T | F | if (not $http_meth)
120 | 100 | T | F | if ($cookies)
122 | 100 | T | F | if ($cookie)
127 | 100 | T | F | if ($cookie)
132 | 100 | T | F | if ($cookie = $$cookies{'last_response'})
137 | 100 | T | F | if ($http_meth eq 'GET' and @bits >= 2 and $bits[0] eq 'last' and $bits[1] eq 'response')
144 | 100 | T | F | if ($bits[0] and not $bits[0] =~ /^(?:login|captcha|version)$/)
148 | 100 | T | F | if (defined $user) { }
163 | 100 | T | F | if ($session)
166 | 50 | T | F | if ($user)
175 | 100 | T | F | if (not $account)
178 | 50 | T | F | if (not $openapi->has_user($account))
185 | 50 | T | F | if (not $openapi->has_role($role))
191 | 100 | T | F | if ($@)
198 | 100 | T | F | if ($bits[0] and not $bits[0] =~ /^(?:login|captcha|version)$/) { }
200 | 100 | T | F | if (not $res)
208 | 50 | T | F | if ($category) { }
211 | 50 | T | F | if (not defined $object)
217 | 50 | T | F | if (not $openapi->can($meth))
224 | 100 | T | F | if ($bits[0] eq 'model')
230 | 100 | T | F | if ($@)