bbix-sender.
$Zabbix::Sender::VERSION = '0.07';
use Moo;
use namespace::autoclean;
use Carp;
use JSON;
use IO::Socket;
use IO::Select;
use Net::Domain;
use Types::Standard -types;
has 'server' => (
=> Bool,
'default' => 0,
);
has '_json' => (
'is' => 'rw',
'isa' => InstanceOf['JSON'],
'lazy' => 1,
'builder' => '_init_json',
);
has '_last_sent' => (
'is'
,
'isa' => Bool,
'default' => 0,
);
sub _init_json {
my $self = shift;
my $JSON = JSON::->new->utf8();
return $JSON;
}
sub _init_hostname {
my $self = shift;
retu