| blib/lib/Bash/Completion/Plugins/Perldoc.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 30 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 61 | 0 | 0 | @args && $args[-1] eq '-f' ? : |
| 70 | 0 | 0 | unless opendir my $dir, shift() |
| 76 | 0 | 0 | unless $name =~ /$file_rx/ |
| 77 | 0 | 0 | if -d catdir($path, $name) |
| 100 | 0 | 0 | if $home ne $_ |
| 107 | 0 | 0 | if ($pkg eq '') { } |
| 0 | 0 | elsif ($pkg =~ /(? | |
| 111 | 0 | 0 | if $num_hidden |
| 125 | 0 | 0 | unless defined $_ |
| 127 | 0 | 0 | if -r $perlfunc |
| 130 | 0 | 0 | unless open my $fh, '<', $perlfunc |
| 135 | 0 | 0 | if 1 .. /^=head2 Alphabetical Listing of Perl Functions$/ |
| 136 | 0 | 0 | if /^=over/ |
| 137 | 0 | 0 | if /^=back/ |
| 138 | 0 | 0 | if $nest_level |