Index: lib/Perlbal/Plugin/Stats.pm =================================================================== --- lib/Perlbal/Plugin/Stats.pm (revision 687) +++ lib/Perlbal/Plugin/Stats.pm (working copy) @@ -59,6 +59,9 @@ push @{$sobj->{recent}}, sprintf('%-6.4f %s', tv_interval($ot), $uri); shift(@{$sobj->{recent}}) if scalar(@{$sobj->{recent}}) > 100; # if > 100 items, lose one } + + delete $sobj->{pending}->{"$obj"}; + return 0; });