add the client-side reporting for MCP mode

1 files changed, 16 insertions, 0 deletions

diff --git a/FS/bin/freeside-yori b/FS/bin/freeside-yori
new file mode 100644
index 000000000..d1137995d
--- /dev/null
+++ b/FS/bin/freeside-yori
@@ -0,0 +1,16 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use FS::Yori qw(reports report);
+
+if ( @ARGV ) {
+  while ( my $report = shift ) {
+    print report($report). "\n";
+  }
+} else {
+  print join("\n", reports() ). "\n";
+}
+
+
+1;