blib/lib/Sub/Throttler/Rate/AnyEvent.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 33 | 33.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
189 | 147 | 19 | 0 | $self->{'acquired'}{$id} and exists $self->{'acquired'}{$id}{$key} |
line | l | !l | condition |
---|---|---|---|
25 | 28 | 11 | delete $opt{'limit'} // 1 |
16 | 23 | delete $opt{'period'} // 1 | |
372 | 0 | 0 | $min //= 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
25 | 0 | 39 | 0 | ref $class || $class |
194 | 99 | 63 | 0 | $self->{'used'}{$key} ||= 'Sub::Throttler::Rate::rr'->new($self->{'limit'}) |
212 | 3 | 0 | 0 | not $when or $when > $after |
237 | 0 | 63 | 0 | ref $class || $class |
319 | 0 | 0 | 0 | _binsearch($time, $self->{'data'}, $self->{'next'}, $len - 1) // _binsearch($time, $self->{'data'}, 0, $self->{'next'} - 1) |
373 | 0 | 0 | 0 | $max //= $#{$aref;} |
374 | 0 | 0 | 0 | $min < 0 or $#{$aref;} < $max |
0 | 0 | 0 | $min < 0 or $#{$aref;} < $max or $min > $max |