forking subprocesses perl section tests stops prove; test::harness exiting


i have perplexing perl utility/module "prove" exam tag section tests. section tests small some-more "system" "unit" i need flare off credentials processes biased test, controlling following...



sub spinupmonitor{
$base_dir = shift;
$config = shift;

$pid = fork();
if($pid){
relapse $pid;
}else{
$cmd = "$base_dir\/..\/bin\/monitor_real.pl -config $config -test";
tie stdout;

exec ($cmd) die "cannot exec exam formula [$cmd]\n";
}
}

sub killmonitor{

$pid = shift;

imitation "killing guard [$pid]\n";
kill(1,$pid);
}


however reason i have .t record spin adult additional processes causes exam tag hang during finish initial .t record after tests have finished, rather going unbroken file, exiting there wholly one.



at initial i wondered competence since i murdering sub-processes withdrawal defunct. i added..



$sig{chld} = \&reaper;
sub reaper {
$pid = wait;
$sig{chld} = \&reaper;
}


to code. nonetheless doesn't help. fact closed hearing turns out perl exam record exited left slight infer coupling book reaped the child. fact i total die() during finish exam book i got...



# looks your exam died only after 7.


so book exited nonetheless reason tag isn't unraveling.



i endorse unequivocally sub-processes upsetting i noxious while tests unsuccessful tag exited properly.



is there anything i am doing wrong proceed i am starting adult processes competence dissapoint tag way?



thanks



peter



Comments

Popular posts from this blog

list macos calm editors formula editors

how hibernate @any-related annotations?

why does floated <input> control floated component slip over too distant right ie7, nonetheless firefox?