Branch Coverage

blib/lib/Text/CSV/SQLhelper.pm
Criterion Covered Total %
branch 0 92 0.0


line true false branch
43 0 0 if (defined $_[1])
56 0 0 unless (defined $args{'csv'})
64 0 0 if (ref $args{'csv'} ne 'Text::CSV')
72 0 0 unless (defined $args{'defaultAllowNull'})
178 0 0 if ($self->error)
183 0 0 unless (defined $file)
192 0 0 unless (open $fh, '<:encoding(utf8)', $file)
203 0 0 if ($removetop)
212 0 0 if (defined $$newrow[0]) { }
225 0 0 unless (defined $row[$int])
226 0 0 if (not defined $columns[$int]) { }
238 0 0 if ($row[$int] =~ /^[0123456789]*$/ and not $matched)
239 0 0 if (not defined $columns[$int]) { }
247 0 0 if (defined $columns[$int]{'type'})
252 0 0 if ($columns[$int]{'type'} eq 'int')
254 0 0 if ($columns[$int]{'min'} > $row[$int])
257 0 0 if ($columns[$int]{'max'} < $row[$int])
262 0 0 if ($columns[$int]{'type'} eq 'string')
265 0 0 if ($columns[$int]{'min'} > $length)
268 0 0 if ($columns[$int]{'max'} < $length)
273 0 0 if ($columns[$int]{'type'} eq 'float')
275 0 0 if ($columns[$int]{'min'} > $row[$int])
278 0 0 if ($columns[$int]{'max'} < $row[$int])
287 0 0 if ($row[$int] =~ /^[0123456789]*\.[0123456789]*$/ and not $matched)
288 0 0 if (not defined $columns[$int]) { }
296 0 0 if (defined $columns[$int]{'type'})
301 0 0 if ($columns[$int]{'type'} eq 'int')
303 0 0 if ($columns[$int]{'min'} > $row[$int])
306 0 0 if ($columns[$int]{'max'} < $row[$int])
314 0 0 if ($columns[$int]{'type'} eq 'string')
317 0 0 if ($columns[$int]{'min'} > $length)
320 0 0 if ($columns[$int]{'max'} < $length)
325 0 0 if ($columns[$int]{'type'} eq 'float')
327 0 0 if ($columns[$int]{'min'} > $row[$int])
330 0 0 if ($columns[$int]{'max'} < $row[$int])
339 0 0 unless ($matched)
340 0 0 unless (defined $columns[$int])
355 0 0 if (not defined $columns[$int]{'min'} or $columns[$int]{'min'} > $length)
358 0 0 if (not defined $columns[$int]{'max'} or $columns[$int]{'max'} < $length)
368 0 0 if (defined $newrow) { }
378 0 0 unless (defined $columns[$int]{'type'})
385 0 0 if ($columns[$int]{'type'} eq 'int')
389 0 0 if ($columns[$int]{'type'} eq 'float')
393 0 0 if ($columns[$int]{'type'} eq 'string')
398 0 0 unless ($columns[$int]{'allownull'})
424 0 0 if ($$self{'perror'})