Re: [問題] 如何讓特定程式只執行一段時間?

看板Perl作者 (相見不如懷念)時間18年前 (2007/08/22 19:17), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/3 (看更多)
#!/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); } } ※ 編輯: LiloHuang 來自: 211.79.63.18 (05/03 20:25)
文章代碼(AID): #16p1j8Mg (Perl)
文章代碼(AID): #16p1j8Mg (Perl)