| blib/lib/CPAN/Index/API/Role/Readable.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 1 | 14 | 7.1 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 0 | 5 | if (&blessed($self)) { } |
| 52 | 0 | 0 | unless my $gz = &gzopen($tarball, 'rb') |
| 58 | 0 | 0 | if $CPAN::Index::API::Role::Readable::gzerrno != Z_STREAM_END() |
| 61 | 0 | 0 | if $gz->gzclose |
| 93 | 0 | 0 | unless my $content = &LWP::Simple::get($uri_as_string) |
| 97 | 0 | 0 | unless print $fh &LWP::Simple::get($uri->as_string) |
| 98 | 0 | 0 | unless close $fh |