| blib/lib/CPAN/02Packages/Search.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 18 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 0 | 0 | exists $argv{'skip_header'} ? : |
| 22 | 0 | 0 | if defined $self->{'pid'} and $self->{'pid'} == $$ |
| 24 | 0 | 0 | if ($self->{'skip_header'}) { } |
| 26 | 0 | 0 | unless tie *$fh, "Tie::Handle::SkipHeader", "<", $file |
| 29 | 0 | 0 | unless open my $fh, "<", $file |
| 41 | 0 | 0 | if $pos == -1 or eof $fh |
| 43 | 0 | 0 | unless $line =~ /\A\Q$package\E\s+/i |
| 46 | 0 | 0 | if ($package eq $_package) |
| 47 | 0 | 0 | if $version eq "undef" |