| line |
true |
false |
branch |
|
33
|
0 |
0 |
unless defined $fields and ref $fields eq 'ARRAY' |
|
50
|
0 |
0 |
if (exists $$self{'__fields'}{$field}) { } |
|
69
|
0 |
0 |
unless (exists $$self{'__fields'}{$field}) |
|
80
|
0 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ > 1) { } |
|
115
|
0 |
0 |
if (defined $opts) |
|
116
|
0 |
0 |
if (ref $opts eq 'HASH') { } |
|
130
|
0 |
0 |
unless (exists $$self{'__fields'}{$field}) |
|
144
|
0 |
0 |
if (defined $value) |
|
174
|
0 |
0 |
unless exists $opts{'fields'} |
|
182
|
0 |
0 |
if exists $opts{'line'} |
|
190
|
0 |
0 |
unless exists $opts{'line'} |
|
203
|
0 |
0 |
unless defined $fields and ref $fields eq 'ARRAY' |
|
220
|
0 |
0 |
unless defined $$self{'_field_list'} and ref $$self{'_field_list'} eq 'ARRAY' |
|
226
|
0 |
0 |
if (defined $r and $r) { } |
|
232
|
0 |
0 |
if ($csv->error_input) { } |
|
243
|
0 |
0 |
unless exists $$self{'_field_list'} and ref $$self{'_field_list'} eq 'ARRAY' |
|
254
|
0 |
0 |
if ($r) { } |
|
291
|
0 |
0 |
unless exists $opts{'fields'} and ref $opts{'fields'} eq 'ARRAY' |
|
311
|
0 |
0 |
if (exists $opts{'classdbi_objects'}) |
|
316
|
0 |
0 |
if (exists $opts{'filename'} or exists $opts{'filehandle'}) { } |
|
|
0 |
0 |
elsif (exists $opts{'objects'}) { } |
|
331
|
0 |
0 |
if (exists $opts{'filename'} and defined $opts{'filename'}) { } |
|
|
0 |
0 |
elsif (exists $opts{'filehandle'} and defined $opts{'filehandle'}) { } |
|
332
|
0 |
0 |
unless -f $opts{'filename'} |
|
334
|
0 |
0 |
unless -r $opts{'filename'} |
|
336
|
0 |
0 |
unless open CSV, $opts{'filename'} |
|
343
|
0 |
0 |
unless defined fileno $opts{'filehandle'} |
|
354
|
0 |
0 |
unless ($line and not $line =~ /^([,"']|\s)+$/) |
|
365
|
0 |
0 |
unless ref $opts{'objects'} eq 'ARRAY' |
|
372
|
0 |
0 |
unless $object->can($field) |
|
386
|
0 |
0 |
if ($opts and ref $opts eq 'HASH') |
|
396
|
0 |
0 |
unless $line |
|
399
|
0 |
0 |
if (defined $args) |
|
400
|
0 |
0 |
if (ref $args eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $args eq 'HASH') { } |
|
421
|
0 |
0 |
unless defined $args and $args |
|
432
|
0 |
0 |
unless ref $self->lines eq 'ARRAY' |