IP address to Hostname

sanPerl has asked for the wisdom of the Perl Monks concerning the following question:

Dear Monks,
I normlly use Net::DNS to get the ip address of hostname. But now I need Hostname from IP address. i.e if I provide 69.147.76.15 then it should reurn me www.yahoo.com. Any suggestions please?

Update
After looking into gethostbyaddr help. I tried following to get "www.yahoo.com" (and Not "f1.us.www.vip.ird.yahoo.com").

my ($name,$aliases,$addrtype,$length,@addrs) = gethostbyaddr(inet_aton
+("69.147.76.15"), AF_INET);
print $name."\n";
print $aliases."#".$addrtype."#".$length."\n";
[download]

I am expecting "www.yahoo.com" in the second line of output (i.e. $aliases), Am I doing something wrong?

Comment on IP address to Hostname Download Code

Replies are listed 'Best First'.
Re: IP address to Hostname by ikegami (Patriarch) on Jul 02, 2009 at 21:28 UTC
It's actually `f1.www.vip.re1.yahoo.com`. `www.yahoo.com` is just an alias. gethostbyaddr is what you want. By the way, Net::DNS is overkill to resolve domains. Socket's `inet_aton` is sufficient.	[reply] [d/l] [select]
Re^2: IP address to Hostname by JavaFan (Canon) on Jul 03, 2009 at 10:22 UTC
Not only is Net::DNS overkill, but using Net::DNS means you're committed to using DNS to do the domain name resolving. While that may work on many machines, `gethostbyaddr` will actually use the resolving that's configured for the system. Which, beside DNS, may consist of files, NIS, NIS+, LDAP, ... or some combination of resolving.	[reply] [d/l]
Re: IP address to Hostname by JavaFan (Canon) on Jul 02, 2009 at 21:17 UTC
There's a Perl interface to the system interface by the same name, `gethostbyaddr`.	[reply]
Re: IP address to Hostname by toolic (Bishop) on Jul 02, 2009 at 21:14 UTC
Super Search where title contains all of "host", "ip" Resolving an IP to its hostname hostname from ip etc... ?node_id=3989;HIT=host%20ip;re=N	[reply]
Re: IP address to Hostname by imrags (Monk) on Jul 03, 2009 at 09:52 UTC
TIMTOWTDI. :) 1. you can use gethostbyaddr `if($input =~ /^\d+.\d+.\d+.\d+$/) { my $name = gethostbyaddr(inet_aton($input),AF_INET); }` [download] Other way, complicated, but gives u more accurate information is 2. Querying a website ARIN Gives you much more information by typing the IP in the "Who is" page. Raghu	[reply] [d/l]
Re: IP address to Hostname by ikegami (Patriarch) on Jul 03, 2009 at 16:34 UTC
Regarding your update, I tried following to get "www.yahoo.com" (and Not "f1.us.www.vip.ird.yahoo.com") That's an odd request because `69.147.76.15` is not associated with `www.yahoo.com`. In fact, no IP address is. `$ nslookup -norecurse www.yahoo.com Non-authoritative answer: www.yahoo.com canonical name = www.wa1.b.yahoo.com.` [download] `www.yahoo.com` is just an alias to another domain. There's no way to find which domains are aliased to a domain name. In part, this is because anyone can alias a domain they own to any domain (even those they don't own).	[reply] [d/l] [select]
Re^2: IP address to Hostname by sanPerl (Friar) on Jul 04, 2009 at 04:01 UTC
Thanks for letting me know this fact.	[reply]