diff options
Diffstat (limited to 'lib/network/ifw.pm')
-rw-r--r-- | lib/network/ifw.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/network/ifw.pm b/lib/network/ifw.pm index 2509b93..94ea851 100644 --- a/lib/network/ifw.pm +++ b/lib/network/ifw.pm @@ -113,7 +113,7 @@ sub resolve_address { eval { local $SIG{ALRM} = sub { die "ALARM" }; alarm 2; - $hostname = gethostbyaddr(inet_aton($ip_addr), AF_INET); + $hostname = gethostbyaddr(inet_aton($ip_addr), Socket::AF_INET); alarm 0; }; $hostname || $ip_addr; |