line |
true |
false |
branch |
225
|
4 |
11 |
if ($$self{'exclusions_file'}) |
228
|
0 |
4 |
unless $$self{'efh'} |
231
|
0 |
15 |
if $args{'format'} and not $args{'format'} =~ /^$format_options_re$/ |
247
|
1 |
0 |
if ($capture) |
260
|
1 |
0 |
if ($format) |
274
|
204 |
6731 |
if $capture{$field} |
275
|
1230 |
5705 |
if $in_quotes{$field} |
276
|
450 |
6485 |
if $in_braces{$field} |
292
|
11 |
39 |
unless $valid_fields{$_} |
298
|
124 |
145 |
if (ref $$self{'capture'} eq 'ARRAY') |
305
|
22 |
102 |
unless $fields_order{$_} |
365
|
2 |
91 |
if ($args{'filename'}) |
368
|
1 |
1 |
if ($args{'filename'} =~ /\.gz$/) { } |
370
|
0 |
1 |
unless $fh = 'IO::Zlib'->new($args{'filename'}, 'rb') |
376
|
0 |
1 |
unless $fh = 'IO::File'->new($args{'filename'}) |
382
|
0 |
93 |
unless $args{'line'} |
388
|
33 |
230 |
if $@ |
389
|
138 |
92 |
unless $self->check_generic_re($args{'line'}) |
402
|
91 |
44 |
if $$self{'required_format'} eq 'UNSPECIFIED' |
406
|
0 |
134 |
unless @captured |
407
|
33 |
101 |
if ($$self{'capture'}) |
414
|
0 |
134 |
if ($$self{'invert'}) { } |
416
|
0 |
0 |
unless $line =~ /^$$self{'exclude_fields_re'}$/ |
420
|
113 |
21 |
if $line =~ /^$$self{'exclude_fields_re'}$/ |
422
|
16 |
5 |
if ($$self{'efh'}) |
437
|
0 |
28 |
unless exists $$self{'captured'}{$field} |