1、time函数：返回从1970年1月1日起累计的秒数
使用：my $t=time();

2、 localtime函数：获取本地时区时间
使用：my $t=localtime(time());

3、gmtime函数： 获取格林威治时间
使用：my $t=gmtime(time());

得到格式化时间(以localtime函数为例)：
my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time());
上式中前三个表示秒、分、时,中间三个是天数、月数(从0开始计数)、年份(相对1990年)，最后三个分别是一周第几天(周几) 、一年第几天、夏令时有效标识。

通过sprintf来格式化时间：

my $format_time=sprintf("%d-%d-%d %d:%d:%d",$year+1990,$mon+1,$mday,$hour,$min,$sec);
得到形如：2010-8-30 21:00:00 格式的时间。
另外，还可以通过Perl的Date模块来取得格式化的时间。

perl上下文介绍
my$para=@_这是标量上下文，$para得到的是@_中元素的个数。my($para)=@_这是列表上下文，$para得到的是@_中的元素值。具体是什么上下文是由等号左边的变量

perl的INC设置分析
1）默认的INC如下：@INC:C:/Perl/site/libC:/Perl/lib2）设置环境变量PERL5LIB来增加到INC，例如：setperl5lib=c:perllibs在设置perl5lib后如下，%ENV:PERL5LIB="c:perllibs"@INC:c:

perl引用的相关知识分享
为何使用引用？在perl4中，hash表中的value字段只能是scalar，而不能是list，这对于有些情况是很不方便的，比如有下面的数据：Chicago,USAFrankfurt,GermanyBerlin,