blib/lib/Log/Log4perl/Appender/Limit.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 12 | 75.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
66 | 10 | 0 | 22 | defined $self->{'max_until_discarded'} and scalar @{$self->{'buffer'};} >= $self->{'max_until_discarded'} - 1 |
73 | 26 | 4 | 2 | defined $self->{'max_until_flushed'} and scalar @{$self->{'buffer'};} >= $self->{'max_until_flushed'} - 1 |
78 | 7 | 0 | 23 | exists $self->{'sent_last'} and $self->{'sent_last'} + $self->{'block_period'} > time |
2 | 0 | 30 | not $flush and (exists $self->{'sent_last'} and $self->{'sent_last'} + $self->{'block_period'} > time) |