From 26a25e640fb1b9c7806988cc949b557116c278bd Mon Sep 17 00:00:00 2001 From: Dirk Koopman 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.43.0