Munin contributed plugins

Révision 1fc177ce

multi_tcp_ping: enable service_check by default

By default, Net::Ping will report a good attempt even when the remote end returns "connection refused". By enabling service_check, the connection must have been established.
See https://perldoc.perl.org/Net/Ping.html#Functions

    $p=Net::Ping->new("tcp", $defaults{timeout});

    $p->hires();

    $p->service_check(1);

    $p->{port_num} = $host->[1] || $defaults{port};

    ($ret, $time, $ip) = $p->ping($host->[0]);

Formats disponibles : Unified diff