blib/lib/Sub/Throttler/Rate/AnyEvent.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 33 | 30.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
185 | 61 | 0 | 1 | $$self{'acquired'}{$id} and exists $$self{'acquired'}{$id}{$key} |
line | l | !l | condition |
---|---|---|---|
23 | 7 | 2 | delete $opt{'limit'} // 1 |
8 | 1 | delete $opt{'period'} // 1 | |
365 | 0 | 0 | $min //= 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
23 | 0 | 9 | 0 | ref $class || $class |
191 | 45 | 16 | 0 | $$self{'used'}{$key} ||= 'Sub::Throttler::Rate::rr'->new($$self{'limit'}) |
209 | 0 | 0 | 0 | not $when or $when > $after |
234 | 0 | 16 | 0 | ref $class || $class |
311 | 0 | 0 | 0 | _binsearch($time, $$self{'data'}, $$self{'next'}, $len - 1) // _binsearch($time, $$self{'data'}, 0, $$self{'next'} - 1) |
366 | 0 | 0 | 0 | $max //= $#{$aref;} |
367 | 0 | 0 | 0 | $min < 0 or $#{$aref;} < $max |
0 | 0 | 0 | $min < 0 or $#{$aref;} < $max or $min > $max |