Perl 計算經過的時間

URL Link //n.sfs.tw/13010

2019-01-07 13:12:31 By 張○○

程式中常會計算程式所執行的時間間隔,在Perl中有很好用的模組:Time::Elapse

use Time::Elapse;

模組的安裝

# cpan -i Time:Elapse

* 更多模組的安裝可參考[PERL] 19-模組的安裝和維護

 

計時開始

Time::Elapse->lapse(my $now);
…程式碼部分

經過時間

隨時讀取 $now的值就是經過的時間。
print "Elapsed time=". $now;

超簡單吧

use Time::Elapse;

Time::Elapse->lapse(my $now); # $now=0;
# .. 你的程式碼..

print "Elapsed time=". $now;

 


原文 2009-10-21 15:56:46