| line |
true |
false |
branch |
|
30
|
0 |
0 |
unless (defined $csvr) |
|
46
|
0 |
0 |
if ($Debug) |
|
50
|
0 |
0 |
unless my $csv = 'Text::CSV_XS'->new({'binary', 1, 'sep_char', ','}) |
|
58
|
0 |
0 |
if ($Debug) |
|
64
|
0 |
0 |
if ($Debug) { } |
|
95
|
0 |
0 |
unless (length $s) |
|
136
|
0 |
0 |
if ($Debug) |
|
140
|
0 |
0 |
if ($has_header) |
|
141
|
0 |
0 |
if ($Debug) { } |
|
145
|
0 |
0 |
if $line =~ /^\s*$/ |
|
154
|
0 |
0 |
if $line =~ /^\s*$/ |
|
165
|
0 |
0 |
if ($Debug) |
|
166
|
0 |
0 |
unless $csvw = 'Text::CSV_XS'->new({'binary', 1, 'sep_char', ','}) |
|
182
|
0 |
0 |
if ($first) |
|
189
|
0 |
0 |
if (exists $h_header{"__mv_$field"}) |
|
207
|
0 |
0 |
if (exists $$result[$lookup->{$key}] and exists $$result[$lookup->{$mv_key}]) |
|
210
|
0 |
0 |
if (decodeMV($$result[$lookup->{$mv_key}], $vals)) |
|
230
|
0 |
0 |
if (@$args >= 1 and $args->[0] eq '__GETINFO__') { } |
|
|
0 |
0 |
elsif (@$args >= 1 and $args->[0] eq '__EXECUTE__') { } |
|
331
|
0 |
0 |
if (defined $messages) |
|
340
|
0 |
0 |
if (@$results == 0) |
|
366
|
0 |
0 |
if (not $fields) { } |