| line |
true |
false |
branch |
|
200
|
7 |
1 |
if (exists $self->{'file'}) |
|
201
|
0 |
7 |
unless (&Params::Util::_STRING($self->{'file'})) |
|
204
|
0 |
7 |
unless (-f $self->{'file'} and -r _) |
|
209
|
0 |
7 |
unless ($self->{'handle'}->open($self->{'file'})) |
|
215
|
8 |
0 |
if (exists $self->{'handle'}) { } |
|
216
|
0 |
8 |
unless (Params::Util::_HANDLE($self->{'handle'})) |
|
224
|
7 |
1 |
unless (&Params::Util::_HASH0($self->{'csv_attr'})) |
|
228
|
42 |
0 |
unless exists $self->{$_} |
|
235
|
0 |
8 |
unless ($self->{'csv_xs'}) |
|
240
|
3 |
5 |
if ($self->{'fields'} and not $self->{'names'}) |
|
245
|
4 |
0 |
if (&Params::Util::_STRING($self->{'names'}) and $self->{'names'}) |
|
251
|
0 |
8 |
if (exists $self->{'names'} and not &Params::Util::_ARRAY($self->{'names'})) |
|
256
|
0 |
8 |
if (exists $self->{'filter'} and not &Params::Util::_CODELIKE($self->{'filter'})) |
|
319
|
8 |
10 |
if ($self->{'names'}) { } |
|
327
|
14 |
4 |
unless $self->{'filter'} |
|
331
|
0 |
4 |
if ($@) |
|
339
|
1 |
3 |
unless defined $rv |
|
367
|
6 |
22 |
if (not $row and 0 + $self->{'csv_xs'}->error_diag) |
|
372
|
1 |
5 |
unless (eof $self->{'handle'} and $err =~ /^EOF/) |
|
377
|
22 |
6 |
if defined $row |
|
431
|
2 |
0 |
if ($self->{'savedrow'}) |
|
471
|
2 |
2 |
if ($self->{'savedrow'}) |
|
497
|
5 |
1 |
if ($names) |
|
498
|
2 |
3 |
if @_ |
|
501
|
0 |
1 |
if @_ |