Add --output json-anon that excludes query examples.

2025-10-21 01:54:44 +00:00 · 2013-07-01 13:38:34 -07:00
parent 5b45256613
commit 16e57a8fea
6 changed files with 25 additions and 19 deletions
--- a/lib/JSONReportFormatter.pm
+++ b/lib/JSONReportFormatter.pm
@@ -228,10 +228,12 @@ override query_report => sub {
         distillate  => $distill,
         attribute   => $groupby,
         query_count => $times_seen,
-         example     => {
-            query => substr($sample->{arg}, 0, $self->max_query_length),
-            ts    => $sample->{ts} ? parse_timestamp($sample->{ts}) : undef,
-         },
+         $args{anon} ? () : (
+            example     => {
+               query => substr($sample->{arg}, 0, $self->max_query_length),
+               ts    => $sample->{ts} ? parse_timestamp($sample->{ts}) : undef,
+            },
+         ),
      };

      my %metrics;