diff --git a/bean-query-goofy-daemon.plx b/bean-query-goofy-daemon.plx
index f2a47e9..eb56b38 100755
--- a/bean-query-goofy-daemon.plx
+++ b/bean-query-goofy-daemon.plx
@@ -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;