The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
NAME
    Net::DNS::Lite - a pure-perl DNS resolver with support for timeout

SYNOPSIS
        use Net::DNS::Lite qw(inet_aton);

        # drop-in replacement for Socket::inet_aton
        $Net::DNS::Lite::TIMEOUT = 5; # global timeout variable
        my $addr = inet_aton("www.google.com");

        # or per-query timeout
        my $addr = inet_aton("www.google.com", $timeout_in_seconds);

DESCRIPTION
    This module provides a replacement function for Socket::inet_aton, with
    support for timeouts.

AUTHOR
    Kazuho Oku

    The module is based on the excellent AnyEvent::DNS by mlehmann.

LICENSE
           This program is free software; you can redistribute it and/or modify it
           under the same terms as Perl itself.

           See <http://www.perl.com/perl/misc/Artistic.html>