| blib/lib/Alien/Base/ModuleBuild/Repository/HTTP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 19 | 68.4 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 55 | 3 | 0 | 4 | defined $disposition and $disposition =~ /filename="([^"]+)"/ || $disposition =~ /filename=([^\s]+)/ |
| 152 | 11 | 0 | 0 | &blessed($res) and $res->isa('HTTP::Response') |
| 162 | 1 | 1 | 1 | $res->{'status'} == 599 and $reason =~ /https support/ |
| line | l | !l | condition |
|---|---|---|---|
| 25 | 2 | 5 | $self->{'protocol_class'} ||= 'HTTP::Tiny' |
| 138 | 9 | 5 | $protocol || 'http' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 42 | 7 | 0 | 0 | shift() || croak('Must specify file to download') |
| 55 | 2 | 2 | 0 | $disposition =~ /filename="([^"]+)"/ || $disposition =~ /filename=([^\s]+)/ |