如何以给定格式显示当前日期时间,包括Perl中的微秒？

概述我希望Perl以下列格式显示当前日期和时间： 2010-02-11 13:12:34.87876 我写了这段代码： use Time::localtime;my $tm = localtime;printf("It is now %04d-%02d-%02d %02d:%02d:%02d\n", $tm->year+1900, ($tm->mon)+1, $tm->mday, $tm- 我希望Perl以下列格式显示当前日期和时间：

2010-02-11 13:12:34.87876

我写了这段代码：

use Time::localtime;my $tm = localtime;printf("It is Now %04d-%02d-%02d %02d:%02d:%02d\n",$tm->year+1900,($tm->mon)+1,$tm->mday,$tm->hour,$tm->min,$tm->sec);

得到了：

2011-11-17 17:22:59

我不知道如何在输出中获得剩余的.87876.有人可以帮帮我吗？

解决方法

use DateTime::HiRes qw();DateTime::HiRes->Now(time_zone => 'local')->strftime('%F %T.%5N')# returns '2011-11-17 17:42:42.21719'

> DateTime::HiRes
> strftime in DateTime

总结

以上是内存溢出为你收集整理的如何以给定格式显示当前日期时间,包括Perl中的微秒？全部内容，希望文章能够帮你解决如何以给定格式显示当前日期时间,包括Perl中的微秒？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。