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} |