1870

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] 命令列傳入參數 argv Perl 的外部傳參,是$ARGV[0]、$ARGV[1]、$ARGV[2].....

[PERL] 23-多執行緒 而多執行緒的程式,可在一次執行程式時間,同時進行多線程的計算,在效率上可獲得即大的提升。

[PERL] 10- 雜湊 Perl 的hash 指標陣列

自行撰寫syslog server建立資訊安全控管中心#3 -- 程式下載和安裝 利用PERL將syslog收攏到資料庫的程式,程式下載和安裝

[PERL] 取得字串長度 使用length來取得字串長度

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

隨機好文

使用Google尋找你的手機 這近發現google竟然可以用來找android的手機,而且不需要經過什麼設定或安裝軟體。

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

[CodeIgniter3] 解決無法上傳特定檔案(.sb2)的問題 上傳時出現The filetype you are attempting to upload is not allowed,要怎麼解決?

一個邏輯的錯誤刪了全部檔案的經驗 今天本來想做一件很簡單的事,但卻足足浪費我多一倍的時間,再加上刪掉我全部的檔案,原因只是因為我自己的邏輯錯誤。

外匯課程經驗 有天遇到某個朋友的正妹朋友,說她有個很棒的外匯投資課程,要我們去聽,只收場地費200大洋。她又說續效最差一個月也有1%,誰還在苦哈哈上班?

精讚::