| … | |
… | |
| 2 | |
2 | |
| 3 | EV::ADNS - |
3 | EV::ADNS - |
| 4 | |
4 | |
| 5 | =head1 SYNOPSIS |
5 | =head1 SYNOPSIS |
| 6 | |
6 | |
|
|
7 | use EV; |
| 7 | use EV::ADNS; |
8 | use EV::ADNS; |
| 8 | |
9 | |
| 9 | EV::ADNS::submit "example.com", EV::ADNS::r_a, 0, sub { |
10 | EV::ADNS::submit "example.com", EV::ADNS::r_a, 0, sub { |
| 10 | my ($status, $expires, @a) = @_; |
11 | my ($status, $expires, @a) = @_; |
| 11 | warn $a[0]; # "127.13.166.3" etc. |
12 | warn $a[0]; # "127.13.166.3" etc. |
| 12 | }; |
13 | }; |
|
|
14 | |
|
|
15 | EV::loop; |
| 13 | |
16 | |
| 14 | =head1 DESCRIPTION |
17 | =head1 DESCRIPTION |
| 15 | |
18 | |
| 16 | This is a simple interface to libadns (asynchronous dns) that |
19 | This is a simple interface to libadns (asynchronous dns) that |
| 17 | integrates well and automatically into the EV event loop. The |
20 | integrates well and automatically into the EV event loop. The |
