看板
[ Perl ]
討論串[問題] sleep與-e搭配應用
共 2 篇文章
首頁
上一頁
1
下一頁
尾頁
內容預覽:
這個 script 的設計不好,如果檔案不存在,無窮迴圈有可能卡死。. 建議要設計合理的 timeout 機制,範例如下:. #!/usr/bin/env perl. my $timer = 30; # timeout after 30 min. while (1) {. if (-e $ARGV[
(還有112個字)
內容預覽:
as title. 我寫一段簡單程式去判斷檔案是否存在. 如果存在就做下一步這樣. wait.pl. #!/usr/bin/perl. while(1){. if(-e $ARGV[0]){. printf("File exist.\n");. exit;. }. sleep(60);. }. 我自
(還有340個字)
首頁
上一頁
1
下一頁
尾頁