Updated query2json, and tidied query2csv

Database/query2csv

@@ -49,7 +49,7 @@ use Data::Dumper;
 our $VERSION = '0.0.4';
 
 #
-# Script and directory names
+# Script name
 #
 ( my $PROG = $0 ) =~ s|.*/||mx;
 
@@ -141,6 +141,9 @@ _debug( $DEBUG >= 3, '$query: ' . Dumper(\$query) );
 $pcount = grep {/\?/} split( '', $query );
 $acount = scalar(@dbargs);
 
+#
+# Check the placeholder and argument counts are the same
+#
 if ( $pcount ne $acount) {
     say STDERR "Query placeholder vs argument mismatch";
     say STDERR "Placeholders = $pcount, Arguments = $acount";
@@ -543,8 +546,8 @@ MySQL/MariaDB format:
  <database>
      dbtype   = MySQL
      host     = 127.0.0.1
-     name     = hpr_hpr
-     user     = hpradmin
+     name     = DBNAME
+     user     = DBUSER
      password = PASSWORD
  </database>