1 files changed, 13 insertions, 0 deletions
diff --git a/scripts/search.pl b/scripts/search.pl
new file mode 100644
index 000000000..6e0f7245d
--- /dev/null
+++ b/scripts/search.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+use Bugzilla;
+use JSON '-convert_blessed_universally';
+
+print JSON->new->pretty->encode(
+    Bugzilla::Elastic::Search->new(
+        quicksearch => "@ARGV",
+        fields => ['bug_id', 'short_desc'],
+        order => ['bug_id'],
+    )->es_query
+);