Subject: | Possible issue in rogue child identification |
Distribution name : POE-Component-IKC-0.2304
Perl Version : 5.10.1
OS : GNU/Linux 2.6.18
Issue =>
In below code snippet from package POE::Component::IKC::Server, divide
factor being used is 1_000_000 while as per Proc::ProcessTable::Process
documentation, stime and utime are 1/100ths of seconds.
So,divide factor should be 100 instead.
Please correct me if i am missing something
Code Snippet =>
elsif($state eq 'run') {
$time=eval{$table{$pid}->utime + $table{$pid}->stime};
warn $@ if $@;
# utime and stime are Linux-only :(
$time /= 1_000_000 if $time; # micro-seconds -> seconds
if($time and $time > 1200) { # arbitrary limit of 20 minutes
$rogues{$pid}=$table{$pid};
warn "$$: $pid has gone rogue, time=$time s\n";
} else {
DEBUG and
warn "$$: child $pid has utime+stime=$time s\n"
if $time > 1;
$ok{$pid}=1;
}