| blib/lib/App/Greple/xp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 16 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 122 | 0 | 5 | unless my $target = delete $opt{&FILELABEL} |
| 124 | 5 | 0 | $opt{'glob'} ? : |
| 127 | 0 | 6 | unless open my $fh, $file |
| 130 | 20 | 10 | if ($opt{'hash_comment'} and not $opt{'fixed'}) |
| 131 | 3 | 17 | if $p =~ /^\s*#/u |
| 133 | 17 | 10 | if ($opt{'slash_comment'} and not $opt{'fixed'}) |
| 136 | 0 | 27 | unless $p =~ /\S/u |
| 137 | 10 | 17 | $opt{'fixed'} ? : |