projects
/
spider.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
16f7b64a8055ba8db031f9197042426922c59f57
[spider.git]
/
perl
/
WSJTX.pm
1
#
2
# WSJTX logging and control protocol decoder etc
3
#
4
#
5
6
package WSJTX;
7
8
use strict;
9
use warnings;
10
use 5.22.1;
11
12
use JSON;
13
use DXDebug;
14
15
my $json;
16
17
sub new
18
{
19
return bless {}, 'WSJTX';
20
}
21
22
sub handle
23
{
24
my ($self, $handle, $data) = @_;
25
26
my $lth = length $data;
27
dbgdump('udp', "UDP IN lth: $lth", $data);
28
return 1;
29
30
}
31
32
sub finish
33
{
34
35
}
36
37
sub per_sec
38
{
39
40
}
41
42
sub per_minute
43
{
44
45
}
46
47
48
1;