blib/lib/Bot/Cobalt/IRC/FloodChk.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 16 | 50.0 |
line | true | false | branch |
---|---|---|---|
26 | 0 | 8 | unless defined $context and defined $key |
30 | 2 | 6 | if ((my $pending = $thisq->count) >= $self->count) |
41 | 2 | 0 | if $delayed > 0 |
54 | 0 | 2 | unless defined $context |
57 | 0 | 2 | unless exists $self->_fqueue->{$context} |
59 | 1 | 1 | if defined $key |
76 | 0 | 0 | if (&Time::HiRes::time() - $latest_time > $self->in) |
83 | 0 | 0 | unless (keys %{$self->_fqueue->{$context};}) |