| blib/lib/SQL/Translator/Parser/xSV.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 25 | 60.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 73 | 0 | 1 | 0 | defined $args->{'trim_fields'} and $args->{'trim_fields'} == 0 |
| 103 | 0 | 1 | 0 | defined $args->{'scan_fields'} and $args->{'scan_fields'} == 0 |
| 152 | 2 | 5 | 0 | $data_type eq "char" and scalar @$size == 2 |
| line | l | !l | condition |
|---|---|---|---|
| 67 | 0 | 1 | $args->{'field_separator'} || ',' |
| 0 | 1 | $args->{'record_separator'} || "\n" | |
| 72 | 21 | 0 | shift() || '' |
| 135 | 8 | 8 | $field_info{$field}{'size'}[$i] || 0 |
| 146 | 7 | 0 | $field_info{$field}{'size'} || [1] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 114 | 1 | 0 | 11 | $data =~ /^-?[,\d]+\.[\d+]?$/ or $data =~ /^-?[,\d]+?\.\d+$/ |
| 1 | 1 | 10 | $data =~ /^-?[,\d]+\.[\d+]?$/ or $data =~ /^-?[,\d]+?\.\d+$/ or $data =~ /^-?\.\d+$/ |