| line |
!l |
l&&!r |
l&&r |
condition |
|
600
|
2480 |
77 |
2 |
$strict and not $_ =~ m[^/] |
|
613
|
0 |
1 |
0 |
$strict and not $_ =~ m[^/] |
|
839
|
73 |
283 |
73 |
$self->{'options'}{'cache'} and $self->{'dataidx'} < $self->{'max_dataidx'} |
|
1042
|
1 |
10 |
3 |
$index <= $self->{'dataidx'} and $index != INSERT_END() |
|
1089
|
3 |
2 |
0 |
not defined $index and $self->{'dataidx'} < 0 |
|
1175
|
5 |
2 |
12 |
defined $ret and defined wantarray |
|
1242
|
2 |
34 |
0 |
defined $row->{$field} and !defined($missing) || $row->{$field} != $missing |
|
1490
|
65 |
0 |
0 |
&firstidx(sub {
$_ eq $header_no_slash;
}
, @ALL_HEADERS) < 0 and &firstidx(sub {
$_ eq $header_no_slash;
}
, @HIDDEN_HEADERS) < 0 |
|
1508
|
0 |
14 |
0 |
not $write_to_h and exists $self->{'default_write_to'} |
|
1553
|
12 |
0 |
1 |
$add_missing_headers and $add_missing_headers eq '1' |
|
1563
|
1 |
0 |
5 |
$self->{'options'}{'missing_data_to_undef'} and not $self->{'options'}{'preserve_detection_limits'} |
|
1566
|
1 |
0 |
5 |
$self->{'options'}{'missing_data_to_undef'} and not $self->{'options'}{'preserve_detection_limits'} |
|
1586
|
2 |
10 |
1 |
not @{$self->{'comments'};} and $add_missing_headers |
|
1715
|
57 |
127 |
774 |
$self->{'missing_is_number'} and &looks_like_number($v) |
|
|
184 |
706 |
68 |
$self->{'missing_is_number'} and &looks_like_number($v) and $v == $self->{'missing'} |
|
|
20 |
870 |
0 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'adl_is_number'} |
|
|
859 |
2 |
9 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'adl_is_number'} and &looks_like_number($v) |
|
|
861 |
8 |
1 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'adl_is_number'} and &looks_like_number($v) and $v == $self->{'above_detection_limit'} |
|
|
20 |
869 |
0 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'bdl_is_number'} |
|
|
858 |
2 |
9 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'bdl_is_number'} and &looks_like_number($v) |
|
|
860 |
8 |
1 |
not $self->{'options'}{'preserve_detection_limits'} and $self->{'bdl_is_number'} and &looks_like_number($v) and $v == $self->{'below_detection_limit'} |
|
|
20 |
860 |
0 |
not $self->{'options'}{'preserve_detection_limits'} and $v eq $self->{'below_detection_limit'} || $v eq $self->{'above_detection_limit'} |
|
1801
|
0 |
4 |
104 |
ref $value eq 'ARRAY' and wantarray |
|
|
4 |
0 |
0 |
ref $value eq 'HASH' and wantarray |
|
2014
|
72 |
0 |
0 |
&firstidx(sub {
$_ eq $header;
}
, @ALL_HEADERS) < 0 and &firstidx(sub {
$_ eq $header;
}
, @HIDDEN_HEADERS) < 0 |
|
2182
|
2365 |
201 |
0 |
length $v == 0 and not $k =~ /_header/ |
|
2200
|
133 |
6 |
0 |
$strict and &firstidx(sub {
"/$_" eq $k;
}
, @ALL_HEADERS) < 0 |
|
|
139 |
0 |
0 |
$strict and &firstidx(sub {
"/$_" eq $k;
}
, @ALL_HEADERS) < 0 and &firstidx(sub {
"/$_" eq $k;
}
, @HIDDEN_HEADERS) < 0 |
|
2209
|
2347 |
80 |
0 |
$strict and &firstidx(sub {
$_ eq $k;
}
, @ALL_HEADERS) < 0 |
|
|
2427 |
0 |
0 |
$strict and &firstidx(sub {
$_ eq $k;
}
, @ALL_HEADERS) < 0 and &firstidx(sub {
$_ eq $k;
}
, @HIDDEN_HEADERS) < 0 |
|
2282
|
0 |
24 |
4 |
$self->{'options'}{'cache'} and $self->{'max_dataidx'} >= 0 |
|
2311
|
21 |
0 |
0 |
$self->{'options'}{'fill_ancillary_data'} and &firstidx(sub {
$_ eq $field;
}
, keys %{$$self{'ancillary'};}) >= 0 |
|
2320
|
1882 |
57 |
0 |
defined $hash->{$case_var} and !defined($missing) || $hash->{$case_var} != $missing |
|
2507
|
129 |
0 |
12 |
defined $self->{'headers'}{"$slash$where"} and $self->{'headers'}{"$slash$where"} =~ /$regex/ |
|
|
129 |
0 |
12 |
defined $self->{'headers'}{"$slash$where"} and $self->{'headers'}{"$slash$where"} =~ /$regex/ and lc $1 ne 'na' |
|
2602
|
0 |
98 |
0 |
defined $row->{$variable} and !defined($missing) || $row->{$variable} != $missing |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1230
|
3 |
0 |
1 |
not $self->{'options'}{'fill_ancillary_data'} or &firstidx(sub {
$_ eq $field;
}
, keys %{$$self{'ancillary'};}) < 0 |
|
1242
|
18 |
14 |
2 |
!defined($missing) || $row->{$field} != $missing |
|
1509
|
0 |
0 |
0 |
$write_to_h ||= $self->{'default_write_to'} |
|
1563
|
7 |
0 |
6 |
$missing eq $adl or $self->{'options'}{'missing_data_to_undef'} and not $self->{'options'}{'preserve_detection_limits'} |
|
1566
|
7 |
0 |
6 |
$missing eq $bdl or $self->{'options'}{'missing_data_to_undef'} and not $self->{'options'}{'preserve_detection_limits'} |
|
1699
|
235 |
0 |
31 |
$self->{'delim'} or $self->guess_delim($line) |
|
1703
|
0 |
266 |
0 |
$field_list ||= $self->{'fields'} |
|
1715
|
0 |
0 |
860 |
$v eq $self->{'below_detection_limit'} || $v eq $self->{'above_detection_limit'} |
|
|
8 |
0 |
880 |
$v eq $self->{'missing'} or not $self->{'options'}{'preserve_detection_limits'} and $v eq $self->{'below_detection_limit'} || $v eq $self->{'above_detection_limit'} |
|
1991
|
111 |
0 |
17 |
$headers{"${slash}missing"} || $DEFAULT_MISSING |
|
1997
|
0 |
7 |
21 |
not defined $v or $v =~ m(^n/?a(?:\[.*?\])?$)i |
|
|
7 |
0 |
21 |
not defined $v or $v =~ m(^n/?a(?:\[.*?\])?$)i or lc $v eq lc $missing |
|
2019
|
0 |
0 |
5 |
$headers{"${slash}begin_header"} or $headers{"${slash}end_header"} |
|
2073
|
4 |
120 |
0 |
$headers{"${slash}below_detection_limit"} || $missing |
|
2074
|
4 |
120 |
0 |
$headers{"${slash}above_detection_limit"} || $missing |
|
2191
|
1190 |
118 |
1258 |
not $self->{'options'}{'preserve_case'} or $k =~ /fields|units/ |
|
2319
|
0 |
1939 |
0 |
$self->{'case_conversion'}{$variable} || $variable |
|
2320
|
30 |
27 |
0 |
!defined($missing) || $hash->{$case_var} != $missing |
|
2416
|
3 |
0 |
4 |
$self->{'delim'} or $self->guess_delim($_[0]) |
|
2602
|
63 |
35 |
0 |
!defined($missing) || $row->{$variable} != $missing |