| line |
true |
false |
branch |
|
49
|
13 |
0 |
if (my $pat = $self->pre_header_pattern) { }
|
|
118
|
0 |
119 |
if $ret
|
|
123
|
0 |
119 |
if $ENV{'HEADER_PROCESS'}
|
|
124
|
24 |
95 |
if (not $self->_peek) { }
|
|
134
|
0 |
0 |
if ($self->$bool) { }
|
|
135
|
0 |
0 |
$self->$check->($line) ? :
|
|
141
|
0 |
121 |
if $ENV{'HEADER_PROCESS'}
|
|
142
|
0 |
121 |
if $ENV{'HEADER_PROCESS'}
|
|
143
|
0 |
121 |
if $ENV{'HEADER_PROCESS'}
|
|
144
|
0 |
121 |
if $ENV{'HEADER_PROCESS'}
|
|
146
|
38 |
83 |
if ($self->pre_header) { }
|
|
148
|
0 |
38 |
if $self->pre_comment
|
|
151
|
2 |
81 |
if $self->comment
|
|
153
|
26 |
95 |
if ($is_pre)
|
|
154
|
0 |
26 |
if $ENV{'HEADER_PROCESS'}
|
|
161
|
0 |
95 |
if $ENV{'HEADER_PROCESS'}
|
|
163
|
24 |
71 |
if ($none or not $is_head and $self->header eq 'auto')
|
|
164
|
0 |
24 |
if $ENV{'HEADER_PROCESS'}
|
|
171
|
0 |
71 |
if $ENV{'HEADER_PROCESS'}
|
|
174
|
9 |
62 |
if ($die or not $is_head)
|
|
176
|
5 |
4 |
unless $is_head
|
|
177
|
6 |
3 |
if $die
|
|
194
|
233 |
6 |
unless $self->comment
|
|
197
|
4 |
6 |
unless ($self->_is_comment->($line->{'line'}))
|
|
208
|
106 |
133 |
unless my $values = $self->_read
|
|
213
|
0 |
133 |
if scalar @$values != $self->_num_fields
|
|
215
|
133 |
0 |
unless ($error)
|
|
223
|
0 |
133 |
if $@
|
|
226
|
0 |
133 |
if $error
|
|
263
|
4 |
3 |
if $self->filtersub->($record)
|