1. 一般使用：

@nowtime=localtime();
#($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
注意：
$mon+1，$year+1900;
$now_string = localtime;  # e.g., "Thu Oct 13 04:54:34 1994"

2.如果要把時間保存在數據庫中，可以先將其保存為字符串，然后讀出時對字符串再處理。

@nowtime=localtime();
$nowstring=join(',',@nowtime);
將$nowstring保存；
讀取：
@nowtime=split(',',$nowstring);

更多內容請參考：http://perldoc.perl.org/functions/localtime.html