From 26a25e640fb1b9c7806988cc949b557116c278bd Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
Date: Sun, 13 Sep 2020 13:16:34 +0100
Subject: [PATCH] add missing WSJTX.pm

---
 perl/WSJTX.pm | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 perl/WSJTX.pm

diff --git a/perl/WSJTX.pm b/perl/WSJTX.pm
new file mode 100644
index 00000000..389b8b21
--- /dev/null
+++ b/perl/WSJTX.pm
@@ -0,0 +1,41 @@
+#
+# WSJTX logging and control protocol decoder etc
+#
+#
+
+package WSJTX;
+
+use strict;
+use warnings;
+use 5.22.1;
+
+use JSON;
+
+my $json;
+
+sub handle
+{
+	my ($self, $handle, $data) = @_;
+
+	my $lth = length $data;
+	dbgdump('udp', "UDP IN lth: $lth", $data);
+
+}
+
+sub finish
+{
+
+}
+
+sub per_sec
+{
+
+}
+
+sub per_minute
+{
+
+}
+
+
+1;
-- 
2.34.1