Add additional debug output.
This commit is contained in:
parent
20ac3c5ef7
commit
f43e0000d1
1 changed files with 1 additions and 0 deletions
|
@ -247,6 +247,7 @@ while (1) {
|
|||
# Occasionally, some of the SELECT statement is printed back to
|
||||
# $rbcOut. Avoid reproducing this in output by waiting for the line
|
||||
# of ----'s. Thus, this only works in text mode right now.
|
||||
print "Line found \"$line\"\n" if $VERBOSE > 9;
|
||||
unless ($seenSeperator) {
|
||||
if ($line =~ /^\s*$/) {
|
||||
$seenSeperator = 1;
|
||||
|
|
Loading…
Reference in a new issue