作者roylee17 (把我id还我阿......)
看板perl
标题Re: [问题] 如何让特定程式只执行一段时间?
时间Wed Aug 22 19:46:20 2007
※ 引述《LiloHuang (相见不如怀念)》之铭言：
: #!/usr/bin/perl
: run();
: run();
: run();
: sub run {
: my $pid = fork();
: if($pid == 0){
: alarm(3); # 秒数
: exec("ping www.hinet.net"); # exec system call
: }else{
: waitpid($pid, 0);
: }
: }
谢谢快速回应
exec("ping www.hinet.net | tee run.log");
exec 还是有类似的问题
我想应该是命令比较复杂的关系，所以 perl 才会用 sub shell 处理
不过，至少可以先用 exec 来做了
tee 的部份再用 perl 的方式处理好了
谢谢你
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.203.139
1F：推 LiloHuang:嗯嗯 :) 08/22 19:48