[無邊框]
  1. 精讚
  2. 新精讚首頁
  3. 後端程設
  4. PERL
  5. Perl 計算經過的時間
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] 簡易檢查網頁記錄檔ip來源統計 利用PERL來檢查網頁記錄檔ip來源統計的簡易程式

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

Perl 的特殊變數：$` $' $#陣列 $1 $2 .. $10 \1 \2 .. \10 介紹Perl 的 $` $' $#array $1..$10 \1..\10這些變數

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

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

[PERL] 檢查IP是否在某個網段內：matchcidr 檢查IP是否在某個網段內 matchcidr in perl

隨機好文

HP SAS硬碟leds燈號說明 HP SAS硬碟leds燈號(hp g7/g6系統適用)說明

談借錢 人借錢時手心向上頭向下，人還錢時手心向下頭向上

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

UTF-8的網頁但IE8一片空白 UTF8編碼的網頁在Firefox 正常顯示、但IE8 就是空白，IE8編碼設定是「自動偵測」可是自動偵測到的是 big5...

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

精讚::