line |
true |
false |
branch |
78
|
0 |
7 |
if (not $first_ref) { }
|
|
3 |
4 |
elsif (@other_args) { }
|
|
4 |
0 |
elsif (is_HashRef($first_ref)) { }
|
174
|
2 |
3 |
if ($self->has_headers)
|
177
|
1 |
1 |
if ($self->should_reconcile_headers and not $self->_has_file_headers)
|
204
|
0 |
11 |
unless open my $fh, '+<:encoding(UTF-8)', $file
|
213
|
7 |
4 |
if (-s $self->_get_file_handle) { }
|
233
|
0 |
11 |
unless seek $self->_get_file_handle, 0, 2
|
343
|
3 |
2 |
if ($first_line)
|
355
|
0 |
6 |
unless close $original_fh
|
368
|
0 |
6 |
unless copy($fh->filename, $self->get_file_name)
|
391
|
0 |
6 |
if (not $header_ref_2) { }
|
408
|
12 |
31 |
if ($second_header eq $first_header)
|
419
|
13 |
12 |
unless $found_match
|
423
|
3 |
12 |
unless (exists $translation->{$pos})
|
429
|
13 |
12 |
unless (exists $translation->{$pos})
|
447
|
2 |
1 |
$self->has_headers ? :
|
448
|
2 |
1 |
if ($self->should_test_first_row)
|
453
|
2 |
0 |
if ($#$array_ref != $#expected_headers)
|
454
|
1 |
1 |
if (scalar @expected_headers == 0) { }
|
463
|
1 |
0 |
unless $ENV{'hide_warn'}
|
469
|
1 |
0 |
unless $ENV{'hide_warn'}
|
493
|
4 |
8 |
if $self->should_test_first_row and not $self->_has_header_named($fixed_key)
|
503
|
2 |
2 |
if (@missing_list)
|
504
|
1 |
1 |
$self->has_headers ? :
|
509
|
2 |
0 |
unless $ENV{'hide_warn'}
|
520
|
11 |
1 |
if ($self->_has_header_named($header)) { }
|
523
|
1 |
0 |
unless $ENV{'hide_warn'}
|
594
|
5 |
0 |
if ($self->_has_file_handle)
|
596
|
0 |
5 |
unless close $self->_get_file_handle
|