| blib/lib/App/BoolFindGrep/Grep.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 24 | 45.8 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 0 | 0 | unless defined $self->match_expr |
| 41 | 0 | 0 | unless %{$self->patterns;} |
| 46 | 0 | 0 | unless -e $file |
| 47 | 0 | 0 | unless -f $file |
| 48 | 0 | 0 | unless -r $file |
| 49 | 0 | 0 | if (my $fh = 'IO::File'->new($file, 'r')) { } |
| 70 | 5 | 1 | if $string =~ /$re/u |
| 80 | 0 | 4 | if $self->line_regexp and $self->word_regexp |
| 84 | 1 | 3 | if $self->fixed_strings |
| 86 | 1 | 3 | if ($self->line_regexp) { } |
| 1 | 2 | elsif ($self->word_regexp) { } | |
| 93 | 1 | 3 | $self->ignore_case ? : |