Re: [問題]請問perl實作timer的問題?

看板Perl作者 (小a)時間16年前 (2009/01/07 23:52), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/4 (看更多)
※ 引述《albertliao (~咖啡癮君子~)》之銘言: : dear all: : 小弟我最近要用到一個迴圈,當10秒內某個條件未達成便停止,但我找個很久似乎 : perl好像沒有提供timer的module可以讓我去計數時間,請問若要用到timer的功能一定要 : 自己用C寫在弄成module去call嗎,請問有沒有已經有公開的module可以使用或是相關的 : 資訊 : 謝謝 可以使用 time() 但是會有誤差 (精準度只到秒) #!/usr/bin/perl $Stamp = time(); print "\n"; for(;;) { print "\e[A", (time() - $Stamp), "\n"; last if( time() - $Stamp > 9 ); } -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 118.232.172.163

01/07 23:54, , 1F
如果要用這種方式 可使用 Time::HiRes 模組達到高精度
01/07 23:54, 1F
文章代碼(AID): #19PC-dCJ (Perl)
文章代碼(AID): #19PC-dCJ (Perl)