Reverse DNS lookup in perl

How do I perform a reverse DNS lookup, that is how do I resolve an IP address to its DNS hostname in Perl?

Solution

gethostbyaddr and similar calls. See http://perldoc.perl.org/functions/gethostbyaddr.html

Unexpected behavior of do
Easy way to replace all keys in a data structure with a standard one
I'm not able to execute a Perl script inside Ajax
koi8-r text is shown incorrectly
How do I download a file with WWW::Mechanize after it submits a form?
How to stop array sort in Perl
specifying the right perl version for git
Two versions of Perl in Mac OS X?
Perl DBI with Mariadb Maxscale
Can't figure out multi-dimensional Perl hash references: Not a HASH reference
Why is "kill" is not exiting a thread immediately?
Net::OpenSSH with Expect to connect to router
Can't locate new.pm in @INC
Parsing broken multipart/mixed email
How can I print a table with multi-line strings using the Text::Table module?
How do I output a text table in Perl?
Is there a bash-perl shortcut to count the number of matches in each line?
Calculate date of birth from age at specific date [MySQL or Perl]
bash perl run argument as command
Match all files in directory and index files from first level children
Print HTML Table from an array with condition with Perl CGI
Why do I get ARRAY(0x9c90818) instead of the items in the array in Perl?
Perl regex for street number street name, at least, one digit, one upper case letter, least two lowercase and one whitespace
File::Copy vs. rename
Using Perl's 'rename' to pad filenames with leading zeros
Swap filenames backwards
Expect module: end of string is correctly matched, but characters remain in 'after' part, causing next expect to continue prematurely
Is there a Perl equivalent to Python's `if __name__ == '__main__'`?
How can I add variables into my Perl one-liner?
Parsing a file by summing up different columns of each row separated by blank line