sub run {
my ( $self, $class, $listen, $options ) = @_;
- my $sock;
+ my $sock = 0;
if ($listen) {
my $old_umask = umask;
unless ( $options->{leave_umask} ) {
while ( $request->Accept >= 0 ) {
$proc_manager && $proc_manager->pm_pre_dispatch();
$class->handle_request( env => \%env );
- $proc_manager && $proc_manager->pm_pre_dispatch();
+ $proc_manager && $proc_manager->pm_post_dispatch();
}
}