| 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 |