You're looking for gethostbyaddr. Example from the docs:

    use Socket;
    $iaddr = inet_aton("216.109.112.135");
    $name  = gethostbyaddr($iaddr, AF_INET);
[download]

-sam