Branch Coverage

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