blib/lib/WebService/Async/CustomerIO/RateLimiter.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 10 | 80.0 |
line | true | false | branch |
---|---|---|---|
28 | 2 | 45 | unless exists $args->{$k} |
29 | 4 | 41 | unless int $args->{$k} > 0 |
30 | 41 | 0 | if exists $args->{$k} |
60 | 2 | 2 | if ++$self->{'counter'} <= $self->limit |
91 | 0 | 1 | unless @{$self->{'queue'};} |