拉不拉多的夢幻世界

在perl程式語言裡,取得系統的時間就要用localtime這個function 這個function比較制式：可以取得固定的時間陣列 分別代表

秒, 分, 時, 日, 月, 年 
在下面的範例 分別代表 s, m , h , d , m , y 而月會比實際少1,所以要加1. 而年比實際少1990 故要加回去：
請看範例 ：
#!/bin/perl 
($s,$m,$h,$d,$M,,$y)=localtime(time);
print "sec is $s\n";
print "min is $m\n";
print "hour is $h\n";
print "day is $d\n";
$M=$M+1;
print "mon is $M\n";
$y=$y+1900 ; 

大家可以拚成自己想要的格式 ;就可以取得自己想要的曰期風格 了

在別的網站看到的

把code 放上來備錄一下

$year     = (localtime)[5] + 1900; # year
$month   = (localtime)[4] + 1;     # month
$day      = (localtime)[3];           # day
$hour     = (localtime)[2];           # hour
$minute  = (localtime)[1];           # minute
$second = (localtime)[0];           # second