|
Lines 147-153
Link Here
|
| 147 |
if (eval {local $SIG{__DIE__};require Socket6;} && |
147 |
if (eval {local $SIG{__DIE__};require Socket6;} && |
| 148 |
eval {local $SIG{__DIE__};require IO::Socket::INET6; IO::Socket::INET6->VERSION("1.26");}) { |
148 |
eval {local $SIG{__DIE__};require IO::Socket::INET6; IO::Socket::INET6->VERSION("1.26");}) { |
| 149 |
Socket6->import(qw(inet_pton inet_ntop getaddrinfo)); |
149 |
Socket6->import(qw(inet_pton inet_ntop getaddrinfo)); |
| 150 |
$ipv6_addr_len = length(pack_sockaddr_in6(161, inet_pton(AF_INET6(), "::1"))); |
150 |
$ipv6_addr_len = length(Socket6::pack_sockaddr_in6(161, inet_pton(AF_INET6(), "::1"))); |
| 151 |
$SNMP_Session::ipv6available = 1; |
151 |
$SNMP_Session::ipv6available = 1; |
| 152 |
} |
152 |
} |
| 153 |
eval 'local $SIG{__DIE__};local $SIG{__WARN__};$dont_wait_flags = MSG_DONTWAIT();'; |
153 |
eval 'local $SIG{__DIE__};local $SIG{__WARN__};$dont_wait_flags = MSG_DONTWAIT();'; |