| blib/lib/OrePAN2/Index.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 3 | 6 | if ($fname =~ /\.gz\z/) { } |
| 23 | 0 | 3 | unless "IO::Uncompress::Gunzip"->new($fname) |
| 34 | 8 | 52 | unless /\S/ |
| 38 | 24 | 0 | if (/^(\S+)\s+(\S+)\s+(.*)$/) |
| 39 | 18 | 6 | $2 eq 'undef' ? : |
| 48 | 8 | 1 | if (my $entry = $self->index->{$package}) |
| 72 | 13 | 71 | if ($self->index->{$package}) |
| 75 | 2 | 11 | if ("version"->parse($orig_ver) > "version"->parse($version)) |
| 93 | 4 | 12 | $simple ? : |