line |
true |
false |
branch |
72
|
2 |
1 |
unless $cols[1] > 0 |
83
|
0 |
7 |
unless my $field = $table->add_field('name', $col_name, 'data_type', $data_type, 'default_value', '', 'size', 255, 'is_nullable', 1, 'is_auto_increment', undef) |
92
|
1 |
6 |
if ($col == 0) |
101
|
1 |
0 |
unless (defined $args->{'scan_fields'} and $args->{'scan_fields'} == 0) |
107
|
1 |
0 |
$ws->{'MinRow'} == 0 ? : |
119
|
22 |
6 |
if not defined $data or $data eq '' |
123
|
2 |
4 |
if ($data =~ /^-?\d+$/) { } |
|
1 |
3 |
elsif ($data =~ /^-?[,\d]+\.[\d+]?$/ or $data =~ /^-?[,\d]+?\.\d+$/ or $data =~ /^-?\.\d+$/) { } |
135
|
0 |
2 |
unless length $_ |
145
|
5 |
7 |
unless defined $size->[$i] |
147
|
7 |
0 |
if ($size->[$i] > $fsize) |
161
|
2 |
1 |
$field_info{$field}{'integer'} ? : |
|
1 |
3 |
$field_info{$field}{'float'} ? : |
|
3 |
4 |
$field_info{$field}{'char'} ? : |
163
|
0 |
7 |
if ($data_type eq 'char' and scalar @$size == 2) |
168
|
7 |
0 |
if $size |
179
|
0 |
7 |
unless $ET_to_ST{$et} |