line |
true |
false |
branch |
74
|
0 |
7 |
if (not $first_ref) { }
|
|
3 |
4 |
elsif (@other_args) { }
|
|
4 |
0 |
elsif (is_HashRef($first_ref)) { }
|
170
|
2 |
3 |
if ($self->has_headers)
|
173
|
1 |
1 |
if ($self->should_reconcile_headers and not $self->_has_file_headers)
|
200
|
0 |
11 |
unless open my $fh, '+<:encoding(UTF-8)', $file
|
209
|
7 |
4 |
if (-s $self->_get_file_handle) { }
|
229
|
0 |
11 |
unless seek $self->_get_file_handle, 0, 2
|
339
|
3 |
2 |
if ($first_line)
|
351
|
0 |
6 |
unless close $original_fh
|
364
|
0 |
6 |
unless copy($fh->filename, $self->get_file_name)
|
387
|
0 |
6 |
if (not $header_ref_2) { }
|
404
|
12 |
31 |
if ($second_header eq $first_header)
|
415
|
13 |
12 |
unless $found_match
|
419
|
3 |
12 |
unless (exists $translation->{$pos})
|
425
|
13 |
12 |
unless (exists $translation->{$pos})
|
443
|
2 |
1 |
$self->has_headers ? :
|
444
|
2 |
1 |
if ($self->should_test_first_row)
|
449
|
2 |
0 |
if ($#$array_ref != $#expected_headers)
|
450
|
1 |
1 |
if (scalar @expected_headers == 0) { }
|
459
|
1 |
0 |
unless $ENV{'hide_warn'}
|
465
|
1 |
0 |
unless $ENV{'hide_warn'}
|
489
|
4 |
8 |
if $self->should_test_first_row and not $self->_has_header_named($fixed_key)
|
499
|
2 |
2 |
if (@missing_list)
|
500
|
1 |
1 |
$self->has_headers ? :
|
505
|
2 |
0 |
unless $ENV{'hide_warn'}
|
516
|
11 |
1 |
if ($self->_has_header_named($header)) { }
|
519
|
1 |
0 |
unless $ENV{'hide_warn'}
|
590
|
5 |
0 |
if ($self->_has_file_handle)
|
592
|
0 |
5 |
unless close $self->_get_file_handle
|