blib/lib/SQL/Translator/Parser/Excel.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 19 | 32 | 59.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
101 | 1 | 0 | 0 | defined $args->{'scan_fields'} and $args->{'scan_fields'} == 0 |
107 | 0 | 1 | 4 | defined $ws->{'MaxRow'} and $iR <= $ws->{'MaxRow'} |
112 | 0 | 4 | 28 | defined $ws->{'MaxCol'} and $iC <= $ws->{'MaxCol'} |
163 | 3 | 4 | 0 | $data_type eq "char" and scalar @$size == 2 |
line | l | !l | condition |
---|---|---|---|
60 | 1 | 0 | $tr->filename || (return) |
65 | 1 | 0 | $wb->{'SheetCount'} || 0 |
146 | 0 | 7 | $field_info{$field}{'size'}[$i] || 0 |
157 | 6 | 1 | $field_info{$field}{'size'} || [1] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
69 | 3 | 0 | 0 | $ws->{'Name'} || "Table$table_no" |
119 | 22 | 0 | 6 | not defined $data or $data eq "" |
123 | 1 | 0 | 3 | $data =~ /^-?[,\d]+\.[\d+]?$/ or $data =~ /^-?[,\d]+?\.\d+$/ |
1 | 0 | 3 | $data =~ /^-?[,\d]+\.[\d+]?$/ or $data =~ /^-?[,\d]+?\.\d+$/ or $data =~ /^-?\.\d+$/ |