Perl gethostbyaddr Function

Description

This function Contacts the system's name-resolving service, returning a list of information for the host ADDR of type ADDRTYPE, as follows − ($name, $aliases, $addrtype, $length, @addrs)

The @addrs array contains a list of packed binary addresses. In a scalar context, returns the host address.

Syntax

Following is the simple syntax for this function −

gethostbyaddr ADDR, ADDRTYPE

Return Value

This function returns undef on error and otherwise host name in scalr context and empty list on error otherwise host record in list context.

Example

Following is the example code showing its basic usage −

#!/usr/bin/perl
use Socket;

   $iaddr = inet_aton("127.1"); # or whatever address
   $name  = gethostbyaddr($iaddr, AF_INET);
   print "Host name is $name\n";

When above code is executed, it produces the following result −

Host name is ip-50-62-147-141.ip.secureserver.net