The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

AnyEvent::DNS::Cache::Simple - Simple cache for AnyEvent::DNS

SYNOPSIS

use AnyEvent::DNS::Cache::Simple;

my $guard = AnyEvent::DNS::Cache::Simple->register(
    ttl => 60,
    negative_ttl => 5,
    timeout => [1,1]
);


for my $i ( 1..3 ) {
    my $cv = AE::cv;
    AnyEvent::DNS::a "example.com", sub {
        say join " | ",@_;
        $cv->send;
    };
    $cv->recv;
}


undef $guard;

DESCRIPTION

AnyEvent::DNS::Cache::Simple provides simple cache capability for AnyEvent::DNS

CPAN already has AnyEvent::CacheDNS module. It also provides simple cache. AnyEvent::DNS::Cache::Simple support ttl, negative_ttl and can use with any cache module. And AnyEvent::DNS::Cache::Simple does not use AnyEvent->timer for purging cache.

METHOD

register

Register cache to $AnyEvent::DNS::RESOLVER. This method returns guard object. If the guard object is destroyed, original resolver will be restored

register can accept all AnyEvent::DNS-new> arguments and has some additional arguments.

SEE ALSO

AnyEvent::DNS, AnyEvent::Socket, AnyEvent::CacheDNS, Cache::Memory::Simple

LICENSE

Copyright (C) Masahiro Nagano.

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

AUTHOR

Masahiro Nagano kazeburo@gmail.com