lock %{ $cnf{'lock'} }; #### # fix me, not work in win32, why? #$SIG{'INT'} = $SIG{'TERM'} = sub { lock %stat; $stat{'done'}++ }; #### # fix me, the thread blocks here, why? # if I lock %{ $cnf{'lock'} } untill close the $c, things will be OK, # but then we can't gain advantage of the multi-threads nor the pre-threads # design. if ( my $r = $c->get_request() ) {