perl date 的学习
发布时间:2020-12-15 21:00:12 所属栏目:大数据 来源:网络整理
导读:1.? perl 中date 的基本命令: !/usr/bin/perl$timestamp=time;($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($timestamp);printf("sec=%d min=%d hour=%d mday=%d mon=%d year=%d wday=%d yday=%d isdst=%dn",$sec,$isdst);my $t =
1.? perl 中date 的基本命令: !/usr/bin/perl $timestamp=time; ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($timestamp); printf("sec=%d min=%d hour=%d mday=%d mon=%d year=%d wday=%d yday=%d isdst=%dn",$sec,$isdst); my $t = localtime($timestamp); printf("%sn",$t); [hostname ~]$ ./test.pl sec=5 min=23 hour=15 mday=12 mon=11 year=112 wday=3 yday=346 isdst=0 Wed Dec 12 15:23:05 2012 my $y = $year + 1900; my $m = $mon + 1; my $dt = $y.$m.$mday;?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????? ? printf("%sn",$dt); ?dt = 20121212 (1). 系统正常显示: 上面代码中 localtime($timestamp)会显示正常的时间: Wed Dec 12 15:23:05 2012 如果需要在代码中获取 year、month、day、hour、minute、sec、weekday 需要用数组处理一下; year =$year + 1900 month= $mon + 1 (2).?? perl 字符串连接用 .? my $dt = ($year + 1900).($mon + 1).$mday; printf("dt = %sn",$dt); dt = 20121212 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |