Subject: | Perfork not able to spawn properly |
Hi, I was finding that the perfork personality of Net::Server was not maintaining its children correctly. It would not spawn new servers when neccessary. I traced this back to the run_child() method of Net::Server::Prefork. It was because the _WRITE handle was not being autoflushed (I think), anyway making it autoflush fixed the problem.
This is running under perl 5.6.1 on Linux hardware
I have attached the fixed version.
Code Added to Net::Server::Prefork::run_child():
local *_WRITE = $prop->{_WRITE};
_WRITE->autoflush(1);
Message body is not shown because it is too large.