line |
true |
false |
branch |
128
|
5 |
84 |
if (ref $_[-1] eq 'HASH') |
139
|
11 |
78 |
if ($opt{'pattern'}) |
142
|
7 |
4 |
if ($pattern) { } |
149
|
3 |
1 |
if ($pattern_name) { } |
157
|
2 |
1 |
if (not ref $pattern) { } |
177
|
1 |
77 |
unless $pattern |
180
|
75 |
2 |
unless ($opt{'loose'}) |
185
|
39 |
38 |
unless @files |
190
|
39 |
38 |
if ($file eq '-') { } |
195
|
0 |
38 |
unless (open $fh, '<', $file) |
203
|
209 |
40 |
if ($line =~ /$re/) |
224
|
0 |
134 |
unless ($pattern->{$part}) |
226
|
0 |
0 |
if ($field_name) |
236
|
4 |
363 |
if (ref $pattern eq 'HASH') |
240
|
324 |
43 |
if ($field_name) |
256
|
31 |
347 |
if ($conf_file->exists) |
272
|
7 |
0 |
if ($pattern) |
274
|
4 |
3 |
unless ($conf_file->exists) |