建站
咨詢
售后
建站咨詢
新聞中心
本文和大家重點(diǎn)討論一下Perl時(shí)間函數(shù)的概念，Perl語(yǔ)言中有兩個(gè)取得Perl時(shí)間函數(shù):localtime()和gmtime()，兩個(gè)函數(shù)的用法一樣，區(qū)別在于localtime為取得本地時(shí)間，gmtime格林威治時(shí)間。
網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)公司！專注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、小程序定制開(kāi)發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了谷城免費(fèi)建站歡迎大家使用！
Perl時(shí)間函數(shù)
Perl語(yǔ)言中有兩個(gè)取得Perl時(shí)間函數(shù):localtime()和gmtime()
兩個(gè)函數(shù)的用法一樣,區(qū)別在于localtime為取得本地時(shí)間,gmtime格林威治時(shí)間
#!/usr/bin/Perl
#getlocaltime
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
其中：
$sec代表秒數(shù)[0,59]
$min代表分?jǐn)?shù)[0,59]
$hour代表小時(shí)數(shù)[0,23]
$mday代表是在這個(gè)月的第幾天[1,31]
$mon代表月數(shù)[0,11],要將$mon加1之后，才能符合實(shí)際情況。
$year從1990年算起的年數(shù)
$wday從星期六算起，代表是在這周中的第幾天[0-6]
$yday從一月一日算起，代表是在這年中的第幾天[0,364]
$isdst只是一個(gè)flag
知道這些變量之后，就可以在CGI應(yīng)用程序中拿來(lái)應(yīng)用了。此外，Perl時(shí)間函數(shù)也可以用下面這一行指令在UNIX系統(tǒng)下取得系統(tǒng)的時(shí)間。為了避免錯(cuò)誤發(fā)生，***用絕對(duì)路徑的方法來(lái)取得系統(tǒng)時(shí)間，如果絕對(duì)路徑不清楚的話可以用”whichdata”這個(gè)指令來(lái)得知。***要提字符的話，就不能正確執(zhí)行系統(tǒng)的程序了。$data=’/usr/bin/data’;而在Perl5版本中，也可以用下面這一行指令來(lái)取得系統(tǒng)時(shí)間
Perl時(shí)間函數(shù)的例子:
格式化所需要的時(shí)間變量:
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
#2001年08月09日
$yyyymmddZH=sprintf("%04d年%02d月%02d日",$year+1900,$mon+1,$mday);
#2001年8月9日
$yyyymmddZH2=sprintf("%d年%d月%d日",$year+1900,$mon+1,$mday);
#2001.08.09
$yyyymmdd=sprintf("%04d.%02d.%02d",$year+1900,$mon+1,$mday);
#2001.08.09
$yyyymmdd2=sprintf("%d.%d.%d",$year+1900,$mon+1,$mday);
#13點(diǎn)13分02秒
$hhmmssZH=sprintf("%02d點(diǎn)%02d分%02d秒",$hour,$min,$sec);
#13點(diǎn)13分2秒
$hhmmssZH2=sprintf("%d點(diǎn)%d分%d秒",$hour,$min,$sec);
#13:13:02
$hhmmss=sprintf("%02d:%02d:%02d",$hour,$min,$sec);
#13:13:2
$hhmmss2=sprintf("%d:%d:%d",$hour,$min,$sec);
#周四
$weekZH=sprintf("%s",("周日","周一","周二","周三","周四","周五","周六")[$wday]);
#Thursday
$weekE=sprintf("%s",("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")[$wday]);
#Thu
$week=sprintf("%s",("Sun","Mon","Tue","Wed","Thu","Fri","Sat")[$wday]);
名稱欄目：解析兩大Perl時(shí)間函數(shù)區(qū)別
網(wǎng)站鏈接：http://www.dlmjj.cn/article/cccsgje.html
