line |
true |
false |
branch |
48
|
4 |
0 |
if exists $sh->{'home_dir'} and defined $sh->{'home_dir'} |
55
|
4 |
0 |
unless $sh->{'term'} |
66
|
0 |
0 |
if ($term->ReadLine eq 'Term::ReadLine::Gnu') |
79
|
0 |
0 |
if (-e $pi->{'history'}) { } |
81
|
0 |
0 |
unless $term->ReadHistory($pi->{'history'}) |
84
|
0 |
0 |
unless open HISTORY, "> $pi->{'history'}" |
127
|
0 |
0 |
unless $list |
128
|
0 |
0 |
unless exists $loa->{$list} |
132
|
0 |
0 |
if (@_) |
160
|
0 |
0 |
unless (defined $loa->{'sql_keywords'}) |
165
|
0 |
0 |
unless defined $key_words |
167
|
0 |
0 |
unless @key_words |
169
|
0 |
0 |
unless defined $loa->{'sql_keywords'} |
172
|
0 |
0 |
if ($@) |
177
|
0 |
0 |
unless (defined $loa->{'columns'}) |
180
|
0 |
0 |
unless $sth |
183
|
0 |
0 |
if defined $row->[0] |
184
|
0 |
0 |
if defined $row->[1] |
185
|
0 |
0 |
if defined $row->[2] |
186
|
0 |
0 |
if defined $row->[3] |
200
|
0 |
0 |
if ($start == 0) { } |
|
0 |
0 |
elsif ($line =~ /
\bfrom(?:\s*)?(?:['"])?$
|
\bfrom(?:\s*)(?:['"])?(?:[\w.]+)
|
\binsert\s+into(?:\s+)?$
|
\binsert\s+into\s+(?:['"])?(?:\w+|[\w+.]|\w+\.\w+)$
|
\bupdate(?:\s*)?(?:['"])?(?:\w+)?$
|
^${cmd_p}desc(?:\s*)?(?:['"])?(?:\w+)?
/xi) { } |
|
0 |
0 |
elsif ($line =~ /select\s+?$|select\s+\w+?$/i) { } |
|
0 |
0 |
elsif ($line =~ /
^insert\s+
into\s+
((?:\w+|\w+\.\w+))\s+?\( # )
/xi) { } |
223
|
0 |
0 |
unless $loa->{'tables'} |
239
|
0 |
0 |
unless (exists $loa->{'ntables'}{$tbl_nm}) |
242
|
0 |
0 |
unless $sth |
248
|
0 |
0 |
if ($@) |
258
|
0 |
0 |
unless ($sth->err) |
295
|
0 |
0 |
unless ($state) |
304
|
0 |
0 |
if $columns[$list_index - 1] =~ /^$text/i |
319
|
0 |
0 |
unless ($state) |
321
|
0 |
0 |
if (exists $loa->{'ntables'}{$tbl_nm}) { } |
333
|
0 |
0 |
if $columns[$list_index - 1] =~ /^$text/i |
346
|
0 |
0 |
unless ($state) |
355
|
0 |
0 |
if $name[$list_index - 1] =~ /^$text/i |
368
|
0 |
0 |
unless ($state) |
377
|
0 |
0 |
if $name[$list_index - 1] =~ /^$text/i |
394
|
0 |
0 |
unless ($state) |
403
|
0 |
0 |
if $tables[$list_index - 1] =~ /^$text/i |
414
|
0 |
0 |
if ($term and $term->ReadLine eq 'Term::ReadLine::Gnu') |
415
|
0 |
0 |
if ($term and $term->history_total_bytes) |
417
|
0 |
0 |
if ($history) |
418
|
0 |
0 |
unless ($term->WriteHistory($history)) |