Branch Coverage: lib/WWW/OpenAPI.pm

# Branch Coverage

File: | lib/WWW/OpenAPI.pm
Coverage: | 50.0%

line | % | coverage | branch
--- | --- | --- | ---
14 | 50 | T | F | ref $_[0] ? :
15 | 50 | T | F | unless my $params = _HASH0(shift @_)
17 | 50 | T | F | unless my $server = delete $$params{'server'}
62 | 50 | T | F | unless not defined $params or _HASH0 $params
64 | 50 | T | F | if ($params and %$params)
65 | 0 | T | F | if ($url =~ /\?/) { }
77 | 50 | T | F | if (not $url =~ m[^http://])
84 | 100 | T | F | if ($content) { }
| 50 | T | F | elsif ($method eq 'POST' or $method eq 'PUT') { }
85 | 50 | T | F | if ($method eq 'GET' or $method eq 'HEAD')
95 | 50 | T | F | if $timer
97 | 50 | T | F | if $timer