[精讚] [會員登入]
1696

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

你可能感興趣的文章

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

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

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

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

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

PERL一次讀取檔案所有內容的方法($/) perl可以使用slurp mode一次讀完檔案所有內容的方法及一些範例

隨機好文

[jQuery] 利用load()來達成ajax的寫法 jQuery中利用load()來達成ajax的寫法,也有人稱他是假的ajax,作法就是..

UTF-8 BOM (Byte Order Mark) 的問題 在 Michael Kaplan 那看到 Every character has a story #4: U+feff

[Windows7] 移除IE10及移除IE11 Windows7 不得已的情況要移除IE11或IE10怎麼做?

Linux shell 的date表示法 linux下SHELL中的date表示法

精讚的版面變化 ▓此文僅作為舊文的記錄▓ 這篇文章為了紀念改版完成而撰寫。 原本的部落格是民國97年的作品,那時還是用舊有的技術來寫,很