| line | % | coverage | branch |
|---|
| 25 | 50 | T | F | ref $_[0] ? : |
| 26 | 50 | T | F | unless my $params = _HASH0(shift @_) |
| 28 | 50 | T | F | unless my $server = delete $$params{'server'} |
| 72 | 50 | T | F | unless not defined $params or _HASH0 $params |
| 74 | 50 | T | F | if ($params and %$params) |
| 75 | 0 | T | F | if ($url =~ /\?/) { } |
| 87 | 50 | T | F | if (not $url =~ m[^http://]) |
| 94 | 100 | T | F | if ($content) { } |
| 100 | T | F | elsif ($method eq 'POST' or $method eq 'PUT') { } |
| 95 | 50 | T | F | if ($method eq 'GET' or $method eq 'HEAD') |
| 104 | 50 | T | F | if $timer |
| 107 | 50 | T | F | if $timer |
| 122 | 100 | T | F | if (%Cookies) |
| 135 | 100 | T | F | if (is_utf8 $Buffer) |
| 138 | 50 | T | F | if ($Buffer =~ m[^HTTP/1\.[01] (\d+) (\w+)\n]) |
| 145 | 100 | T | F | if ($raw_cookie) |
| 160 | 100 | T | F | if ($uri =~ /\?(.+)/) |
| 172 | 50 | T | F | if ($key =~ /^(?:PUTDATA|POSTDATA)$/) |
| 180 | 100 | T | F | if (defined $name) { } |