line |
true |
false |
branch |
92
|
0 |
0 |
ref $_[0] ? : |
96
|
0 |
0 |
if $update and $ignore |
98
|
0 |
0 |
if (ref($file) =~ /^(?:ARRAY|HASH)$/) |
105
|
0 |
0 |
unless ($table) |
110
|
0 |
0 |
unless ($format) |
115
|
0 |
0 |
if ($format eq 'csv' or $format eq 'tsv') { } |
119
|
0 |
0 |
if ($format eq 'json') { } |
|
0 |
0 |
elsif ($format =~ /ya?ml/) { } |
123
|
0 |
0 |
unless open my $fh, '<', $file |
130
|
0 |
0 |
unless $rows = 'YAML::Tiny'->read($file) |
149
|
0 |
0 |
$format eq 'tsv' ? : |
|
0 |
0 |
unless my $csv = 'Text::CSV'->new({'binary', 1, 'blank_is_undef', 1, 'sep_char', $format eq 'tsv' ? "\t" : ',', %{$self->csv_option;}}) |
152
|
0 |
0 |
unless open my $fh, '<', $file |
166
|
0 |
0 |
if $args{'update'} and $args{'ignore'} |
170
|
0 |
0 |
if $update and $ignore |
174
|
0 |
0 |
if $bulk_insert and $skip_null_column |
177
|
0 |
0 |
if (exists $args{'update'}) |
179
|
0 |
0 |
if $update |
181
|
0 |
0 |
if (exists $args{'ignore'}) |
183
|
0 |
0 |
if $ignore |
186
|
0 |
0 |
if ($update and $self->_driver_name ne 'mysql') |
192
|
0 |
0 |
unless @$data |
196
|
0 |
0 |
unless my $txn = $self->transaction_manager->txn_scope |
198
|
0 |
0 |
if ($delete) |
203
|
0 |
0 |
if $ignore |
204
|
0 |
0 |
if ($bulk_insert) { } |
205
|
0 |
0 |
if $update |
207
|
0 |
0 |
$opt ? : |
209
|
0 |
0 |
unless $dbh->do($sql, undef, @binds) |
212
|
0 |
0 |
$update ? : |
214
|
0 |
0 |
defined $$row_orig{$_} ? : |
215
|
0 |
0 |
!$skip_null_column ? : |
217
|
0 |
0 |
if $update |
218
|
0 |
0 |
$opt ? : |
220
|
0 |
0 |
unless $dbh->do($sql, undef, @binds) |
223
|
0 |
0 |
unless $txn->commit |
233
|
0 |
0 |
if (ref $data eq 'HASH') { } |
|
0 |
0 |
elsif (ref $data eq 'ARRAY') { } |
237
|
0 |
0 |
if ($$data[0] and $$data[0]{'data'} and ref $$data[0]{'data'} eq 'HASH') { } |