=head1 NAME
EV::DNS - perl interface to libevent's evdns module
=head1 SYNOPSIS
use EV::DNS;
EV::DNS::resolve_reverse +(Socket::inet_aton "129.13.162.95"), 0, sub {
my ($result, $type, $ttl, @ptrs) = @_;
warn "resolves to @ptrs";
};
EV::DNS::resolve_ipv4 "www.goof.com", 0, sub {
my ($result, $type, $ttl, @ptrs) = @_;
warn "resolves to " . Socket::inet_ntoa $ptrs[0]
if @ptrs;
};
=head1 DESCRIPTION
This module provides an interface to libevent's evdns module, see
(L).
=cut
package EV::DNS;
use strict;
use EV;
=head1 FUNCTIONAL INTERFACE
TODO
=over 4
=back
=back
=head1 BUGS
* At least up to version 1.3e of libevent, resolve_reverse_ipv6 will
always crash the program with an assertion failure.
* use'ing this module will keep events registered so the event loop
will never return unless loopexit is called.
=cut
init;
1;
=head1 SEE ALSO
=head1 AUTHOR
Marc Lehmann
http://home.schmorp.de/
=cut