码迷,mamicode.com
首页 >  
搜索关键字:perl实现守护进程    ( 1个结果
perl实现守护进程
#!/usr/bin/perlusestrict;useFile::Slurp;useProc::Fork;my$code=read_file(‘./dig.pl‘);while(1){run_fork{child{eval($code);if($@){ERROR$@;}exit;}parent{my$childPid=shift;waitpid$childPid,0;}};sleep1800;}
分类:系统相关   时间:2015-08-04 23:16:57    阅读次数:190
1条  
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!