summaryrefslogblamecommitdiff
path: root/lib/Plack/Middleware/Throttle/Limiter.pm
blob: 626732de1341be0139db648badee9c3d4fd718bb (plain) (tree)




















                                                 
package Plack::Middleware::Throttle::Limiter;

use Moose;
extends 'Plack::Middleware::Throttle';

sub request_done {
    my ( $self, $env ) = @_;
    my $key = $self->cache_key($env);

    $self->backend->incr($key);

    my $request_done = $self->backend->get($key);

    if ( !$request_done ) {
        $self->backend->set( $key, 1 );
    }

    $request_done;
}

1;