AnyEvent-ZabbixSender

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         }
      },
      "configure" : {
         "requires" : {
            "Canary::Stability" : "0",
            "ExtUtils::MakeMaker" : "6.52"
         }
      },
      "runtime" : {
         "recommends" : {
            "JSON::XS" : "3"
         },
         "requires" : {
            "AnyEvent" : "7",
            "JSON::PP" : "2.2",
            "Task::Weaken" : "0",
            "common::sense" : "3.74"
         }
      }
   },
   "release_status" : "stable",

META.yml  view on Meta::CPAN

license: unknown
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: AnyEvent-ZabbixSender
no_index:
  directory:
    - t
    - inc
recommends:
  JSON::XS: '3'
requires:
  AnyEvent: '7'
  JSON::PP: '2.2'
  Task::Weaken: '0'
  common::sense: '3.74'
version: '1.1'

Makefile.PL  view on Meta::CPAN

    PREREQ_PM    => {
       common::sense => 3.74,
       AnyEvent      => 7.0,
       Task::Weaken  => 0,
       JSON::PP      => 2.2,
    },
    META_MERGE => {
       "meta-spec" => { version => 2 },
       prereqs => {
          runtime => {
             recommends => { JSON::XS => 3 },
          },
       },
    },
});

$mm->flush;

ZabbixSender.pm  view on Meta::CPAN

Will be called with the (generally rather useless) response form the
zabbix server.

=back

=cut

our $NOP = sub { };

my $json = eval { require JSON::XS; JSON::XS->new } || do { require JSON::PP; JSON::PP->new };

$json->utf8;

sub new {
   my $class = shift;
   my $self  = bless {
      server      => "localhost:10051",
      delay       => 0,
      retry_min   => 30,
      retry_max   => 300,