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

[無邊框]

1645

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] Regex 字元集(群組) 幾個Perl在regular express會用到的特殊符號notation：字元集

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

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

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

關於Perl，你得知道這幾點 Perl 有不少奇異的地方，值得看一看

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

隨機好文

[Freebsd] 使用 ADSL 撥接上網 Freebsd上要使用 ADSL 撥接上網，該如何設定？

UTF8中文字/全形一覽快速查詢urf-8的中文字，共計13246中文字(5401常用字+7652罕用字+日文或編號)，292全形符號，27半形符號。

Smarty安裝 smarty 是著名的樣版引擎，非常的好用，用多了突然發現拿掉smarty反而不會寫php了，以下是安裝過程..

海棉寶寶超泡杯演奏的sweet victory 章魚哥和海棉寶寶在超泡杯的演奏歌曲

[AS3] 變數型態基本類型宣告 as3 有下列幾種基本類型：string, int, number, object, boolean, n

- 計時開始
- 經過時間

到最底端