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

[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);
        }
}


※ 編輯: LiloHuang       來自: 211.79.63.18         (05/03 20:25)