enhancement: add IPv6 support to check plugin
This commit is contained in:
parent
7a6dcd78f0
commit
1c76ec92eb
@ -19,6 +19,7 @@
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use IO::Socket;
|
use IO::Socket;
|
||||||
|
use IO::Socket::IP;
|
||||||
use IO::Socket::Timeout;
|
use IO::Socket::Timeout;
|
||||||
|
|
||||||
sub usage_die()
|
sub usage_die()
|
||||||
@ -44,7 +45,7 @@ if (not defined $timeout)
|
|||||||
}
|
}
|
||||||
|
|
||||||
# prepare the UDP connection
|
# prepare the UDP connection
|
||||||
my $ts3_sock = IO::Socket::INET->new(
|
my $ts3_sock = IO::Socket::IP->new(
|
||||||
Proto => 'udp',
|
Proto => 'udp',
|
||||||
PeerPort => $port,
|
PeerPort => $port,
|
||||||
PeerAddr => $host,
|
PeerAddr => $host,
|
||||||
|
Loading…
Reference in New Issue
Block a user