Perl 計算經過的時間 @新精讚

[無邊框]

Perl 計算經過的時間

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

此文完整連結 http://n.sfs.tw/13010

複製連結 Perl 計算經過的時間@新精讚

(文章歡迎轉載，務必尊重版權註明連結來源)

2019-01-21 16:57:59 最後編修

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

Weibao Tumblr QQ FB G+ LinkedIn Line Twitter

你可能感興趣的文章

[PERL] 自寫 trim, ltrim, rtrim 函數常用的 perl 函數中沒有trim, ltrim, rtrim這三個函數，那就自己來寫，非常容易

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

[PERL] Regex 字元集(群組) 幾個Perl在regular express會用到的特殊符號notation：字元集

[PERL] 命令列傳入參數 argv Perl 的外部傳參，是$ARGV[0]、$ARGV[1]、$ARGV[2].....

[PERL] 20- 檔案目錄處理 PERL寫入和讀出檔案

[PERL] 簡易檢查網頁記錄檔ip來源統計利用PERL來檢查網頁記錄檔ip來源統計的簡易程式

[PERL] split 寫法 Perl 將字串分開可以用 split 這個函數，此函數可以用Regex作分隔判斷

自行撰寫syslog server建立資訊安全控管中心#2 -- 架構和作法利用PERL將syslog收攏到資料庫的程式，架構和作法

[PERL] 16-字串取代和置換 Perl 字串比對及置換

[PERL]] find 和 perl 的結合--大量檔案中文字的取代利用PERL作大量的文件取代

我有話要說

訪客留言

[無留言]

隨機好文

[Freebsd] 定時測試 ADSL 是否斷線並重連中華電信 ADSL 雖有固定 ip，可是他卻會不定時「斷線」, 使用以下的方法可以定時測試是否斷線，以及重新撥接。

為什麼要重造輪子？什麼輪子？造什麼輪子？我為什麼要重造輪子？

[Win7] 燒錄 iso 檔在Windows7 中內建燒錄程式，可以直接把檔案拉到光碟機裡，再執行燒錄。

世紀帝國征服者新版本--被遺忘的帝國世紀帝國征服者新版本--被遺忘的帝國世紀二代的征服者是精典遊戲中的精典，aofe更好玩...

魔球中小女孩唱的歌 The show 魔球中小女孩唱的歌 The show