| line |
true |
false |
branch |
|
46
|
0 |
0 |
unless ($sth) |
|
51
|
0 |
0 |
unless ($res) |
|
60
|
0 |
0 |
if (my $sth = $self->run_sql($sql)) |
|
70
|
0 |
0 |
if (ref $ref eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $ref eq 'SCALAR') { } |
|
76
|
0 |
0 |
if (defined $$self{'param'}{$ref}) { } |
|
93
|
0 |
0 |
unless $$ref{'Null'} =~ /YES/i |
|
95
|
0 |
0 |
if ($$ref{'default'}) { } |
|
99
|
0 |
0 |
if ($$ref{'Null'} =~ /YES/i and not $$ref{'Type'} =~ /timestamp/i) { } |
|
107
|
0 |
0 |
$$ref{'Extra'} ? : |
|
114
|
0 |
0 |
if ($$ref{'Key_name'} =~ /PRIMARY/i) { } |
|
|
0 |
0 |
elsif ($$ref{'Non_unique'} =~ /0/i) { } |
|
|
0 |
0 |
elsif ($$ref{'Index_type'} =~ /FULLTEXT/i) { } |
|
137
|
0 |
0 |
if (not $$self{'param'}{'tables'}) { } |
|
171
|
0 |
0 |
if ($$self{'param'}{'USE_REPLACE'}) { } |
|
198
|
0 |
0 |
if (not $$self{'param'}{'tables'}) { } |
|
206
|
0 |
0 |
if $$self{'param'}{'SHOW_TABLE_NAMES'} and $table_data |
|
207
|
0 |
0 |
if $table_data |
|
213
|
0 |
0 |
if $$self{'param'}{'SHOW_TABLE_NAMES'} and $table_data |
|
214
|
0 |
0 |
if $table_data |
|
239
|
0 |
0 |
if ($fline =~ /\r\n/) { } |
|
|
0 |
0 |
elsif ($fline =~ /\n\r/) { } |
|
|
0 |
0 |
elsif ($fline =~ /\r/) { } |
|
282
|
0 |
0 |
if ($fline =~ /\r\n/) { } |
|
|
0 |
0 |
elsif ($fline =~ /\n\r/) { } |
|
299
|
0 |
0 |
if ($sql =~ /^CREATE TABLE ([`\w]+) \((.*)\)/i) { } |
|
|
0 |
0 |
elsif ($sql =~ /^ALTER TABLE (.*) DROP INDEX (.*);/i) { } |
|
|
0 |
0 |
elsif ($sql =~ /^INSERT/i or $sql =~ /^REPLACE/i) { } |
|
302
|
0 |
0 |
if ($tables[$i] eq $1 or lc $tables[$i] eq lc $1) |
|
319
|
0 |
0 |
if ($columns_desc[$j] =~ /^([`\w]+) /) |
|
326
|
0 |
0 |
if ($real_columns_desc[$j] =~ /^([`\w]+) /) |
|
335
|
0 |
0 |
if ($columns_desc[$j] =~ /^PRIMARY KEY \(([`\w]+)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^KEY(.*)\(([`\w]+)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^INDEX(.*)\(([`\w]+)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^UNIQUE INDEX(.*)\(([`\w]+)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^FULLTEXT INDEX(.*)\(([`\w]+)\)/) { } |
|
|
0 |
0 |
elsif (lc $columns[$j] eq lc $real_columns[$k]) { } |
|
342
|
0 |
0 |
if ($$temp{'Key_name'} eq 'PRIMARY' || $$temp{'Key_name'} eq 'primary' and '`' . $$temp{'Column_name'} . '`' eq $column_name || '`' . lc($$temp{'Column_name'}) . '`' eq lc $column_name) |
|
353
|
0 |
0 |
if ($columns_desc[$j] eq $real_columns_desc[$k]) |
|
359
|
0 |
0 |
if ($bool) |
|
366
|
0 |
0 |
if ($columns_desc[$j] eq $real_columns_desc[$k]) |
|
374
|
0 |
0 |
if ($bool) |
|
379
|
0 |
0 |
if ($columns_desc[$j] eq $real_columns_desc[$k]) |
|
385
|
0 |
0 |
if ($bool) |
|
391
|
0 |
0 |
if ($columns_desc[$j] eq $real_columns_desc[$k]) |
|
396
|
0 |
0 |
if ($bool) |
|
400
|
0 |
0 |
if (lc $columns_desc[$j] eq lc $real_columns_desc[$k]) { } |
|
413
|
0 |
0 |
if (not $bool) { } |
|
|
0 |
0 |
elsif ($bool == 2) { } |
|
416
|
0 |
0 |
if ($columns_desc[$j] =~ /^PRIMARY KEY \(([`\w]+)\)/) |
|
425
|
0 |
0 |
if ($rows > 1) |
|
432
|
0 |
0 |
unless ($key) |
|
433
|
0 |
0 |
if ($columns_desc[$j] =~ /^KEY (.*) \((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^KEY(.*)\((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^INDEX (.*) \((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^INDEX(.*)\((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^UNIQUE INDEX (.*) \((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^UNIQUE INDEX(.*)\((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^FULLTEXT INDEX (.*) \((.*)\)/) { } |
|
|
0 |
0 |
elsif ($columns_desc[$j] =~ /^FULLTEXT INDEX(.*)\((.*)\)/) { } |
|
468
|
0 |
0 |
if (not $key) { } |
|
470
|
0 |
0 |
if ($columns_desc[$j] =~ /auto_increment/i) |
|
472
|
0 |
0 |
unless eval {
do {
$dbh->do($sql2)
}
} |
|
484
|
0 |
0 |
if ('`' . $$ref{'Key_name'} . '`' eq $key_name) |
|
489
|
0 |
0 |
unless ($key_exists) |
|
503
|
0 |
0 |
unless eval {
do {
$dbh->do($sql2)
}
} |
|
511
|
0 |
0 |
if ($i == $#tables) |
|
521
|
0 |
0 |
if (lc $$temp{'Key_name'} eq lc $2) |
|
526
|
0 |
0 |
if ($bool) |
|
535
|
0 |
0 |
if ($table eq 'perlDesk_settings' and not $sql =~ /^ALTER/i) { } |
|
536
|
0 |
0 |
if ($sql =~ /\(value, setting\) VALUES \('(.*)', 'db_version'\);$/i) { } |
|
545
|
0 |
0 |
unless ($sth->rows) |