| line |
true |
false |
branch |
|
121
|
5 |
75 |
if (ref $_[-1] eq 'HASH') |
|
132
|
11 |
69 |
if ($opt{'pattern'}) |
|
135
|
7 |
4 |
if ($pattern) { } |
|
142
|
3 |
1 |
if ($pattern_name) { } |
|
150
|
2 |
1 |
if (not ref $pattern) { } |
|
170
|
1 |
68 |
unless $pattern |
|
173
|
66 |
2 |
unless ($opt{'loose'}) |
|
178
|
34 |
34 |
unless @files |
|
183
|
34 |
34 |
if ($file eq '-') { } |
|
188
|
0 |
34 |
unless (open $fh, '<', $file) |
|
196
|
196 |
40 |
if ($line =~ /$re/) |
|
217
|
0 |
120 |
unless ($pattern->{$part}) |
|
219
|
0 |
0 |
if ($field_name) |
|
229
|
4 |
318 |
if (ref $pattern eq 'HASH') |
|
233
|
284 |
38 |
if ($field_name) |
|
249
|
31 |
302 |
if ($conf_file->exists) |
|
265
|
7 |
0 |
if ($pattern) |
|
267
|
4 |
3 |
unless ($conf_file->exists) |