line |
true |
false |
branch |
78
|
0 |
7 |
if (not $first_ref) { }
|
|
3 |
4 |
elsif (@other_args) { }
|
|
4 |
0 |
elsif (is_HashRef($first_ref)) { }
|
176
|
2 |
3 |
if ($self->has_headers)
|
179
|
1 |
1 |
if ($self->should_reconcile_headers and not $self->_has_file_headers)
|
206
|
0 |
11 |
unless open my $fh, '+<:encoding(UTF-8)', $file
|
215
|
7 |
4 |
if (-s $self->_get_file_handle) { }
|
235
|
0 |
11 |
unless seek $self->_get_file_handle, 0, 2
|
345
|
3 |
2 |
if ($first_line)
|
357
|
0 |
6 |
unless close $original_fh
|
370
|
0 |
6 |
unless copy($fh->filename, $self->get_file_name)
|
393
|
0 |
6 |
if (not $header_ref_2) { }
|
410
|
12 |
31 |
if ($second_header eq $first_header)
|
421
|
13 |
12 |
unless $found_match
|
425
|
3 |
12 |
unless (exists $translation->{$pos})
|
431
|
13 |
12 |
unless (exists $translation->{$pos})
|
449
|
2 |
1 |
$self->has_headers ? :
|
450
|
2 |
1 |
if ($self->should_test_first_row)
|
455
|
2 |
0 |
if ($#$array_ref != $#expected_headers)
|
456
|
1 |
1 |
if (scalar @expected_headers == 0) { }
|
465
|
1 |
0 |
unless $ENV{'hide_warn'}
|
471
|
1 |
0 |
unless $ENV{'hide_warn'}
|
495
|
4 |
8 |
if $self->should_test_first_row and not $self->_has_header_named($fixed_key)
|
505
|
2 |
2 |
if (@missing_list)
|
506
|
1 |
1 |
$self->has_headers ? :
|
511
|
2 |
0 |
unless $ENV{'hide_warn'}
|
522
|
11 |
1 |
if ($self->_has_header_named($header)) { }
|
525
|
1 |
0 |
unless $ENV{'hide_warn'}
|
596
|
5 |
0 |
if ($self->_has_file_handle)
|
598
|
0 |
5 |
unless close $self->_get_file_handle
|