| blib/lib/RateLimitations.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 16 | 31.2 |
| line | true | false | branch |
|---|---|---|---|
| 70 | 0 | 1 | if $that_limit->[1] <= $this_limit->[1] |
| 72 | 0 | 1 | if not $improper and $this_limit->[2] < $that_limit->[2] |
| 76 | 0 | 2 | if ($improper) |
| 90 | 0 | 0 | unless ref $args eq 'HASH' |
| 92 | 0 | 0 | unless &all(sub { defined $_; } , $service, $consumer) |
| 94 | 0 | 0 | unless $limit |
| 104 | 0 | 0 | if (($redis->lindex($key, $rate->[1]) // 0) > $now - $rate->[0]) |
| 131 | 1 | 1 | unless $svc_limits |