追风之云

表示日期的方式多种多样：
“18 Jan 1973″ ，”18/01/1973″ ，”01/18/1973″ ，”Jan 18 1973″ ，”18-01-73″ ，”18-01-1973″ ，”01/73″，其中一些格式含义不清(如”01-06-1973″是表示6月1日呢，还是表示1月6日呢？)
如果不规定日期的表示形式，是很难处理的。

Perl中的time() 函数返回以纪元秒形式表示的当前日期和时间。

print time()
1251774081

调用 gmtime() 函数，你会得到一系列值的列表,包括时，分，秒, 日期，月份，年份等等。

print gmtime()
Tue Sep 1 03:01:21 2009

localtime()函数的返回值
($sec, $min, $hour, $day, $mon, $year, $wday, $yday, $isdst) = localtime();