[精讚] [會員登入]
1499

Perl 計算經過的時間

Perl 計算程式執行經過的時間

分享此文連結 //n.sfs.tw/13010

分享連結 Perl 計算經過的時間@新精讚
(文章歡迎轉載,務必尊重版權註明連結來源)
2019-10-23 16:40:57 最後編修
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

END

你可能感興趣的文章

自行撰寫syslog server建立資訊安全控管中心#1 -- 前言及syslog介紹 利用PERL將syslog收攏到資料庫的程式

[PERL] 01-撰寫第一隻PERL程式及目錄 PERL的系列教學文,適合有其他程式經驗但沒學過PERL的人

[PERL] 15-進階比對 #2--使用更多修飾子 perl的正規表達式進階比對

[PERL] Perl 不立即輸出的列印緩衝區問題 解決Perl 不立即輸出而是最後一次輸出的列印緩衝區問題

[PERL] 前置if和後置if (if修飾子)的差別 perl的if可以拿來作為後置修飾子使用,此外還有一個unless像是if的相反,分析他們的差異

自行撰寫syslog server建立資訊安全控管中心#4 -- 過濾條件設定 利用PERL將syslog收攏到資料庫的程式,過濾條件設定

隨機好文

[HP DL380G7] 生效啟動第3,4片網卡/開啟或關閉內建的網卡 HP DL380G7 預設第3,4片網卡裝完系統後找不到,難道是壞了?要怎麼辦?

看懂DSUB DVI HDMI USB等各式影音接頭 看懂DSUB DVI HDMI等各式影音接頭

[JAVA] JWS, JWT, JWE, JOSE是什麼? [JAVA] JWS, JWT, JWE, JOSE是什麼?非常的複雜,儘量來搞清楚..

[HTML] CSS中的折字換行或不換行(防止容器破壞) 使用者留言時故意來用一串長長的且沒有任何空白的長字串,把你的容器破壞得很難看...

[CKeditor4] 設定區塊樣式、段落格式、字型名稱及字型大小 CKeditor4中要自訂設定區塊樣式、段落格式、字型名稱及字型大小。