| 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'};} |