diff --git a/translated/tech/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md b/published/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md similarity index 81% rename from translated/tech/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md rename to published/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md index 34b8bf4629..18ce4c5587 100644 --- a/translated/tech/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md +++ b/published/20150316 Linux FAQs with Answers--How to convert between local time and UNIX timestamp in Perl.md @@ -1,8 +1,8 @@ Linux有问必答:Perl中本地时间和UNIX时间戳间相互转换 ================================================================================ -> **问题**: 在Perl语言中,我需要转换易读的日期和时间到对应的UNIX时间戳,反之亦然。你可以给我一些Perl代码例子吗?关于日期及时间转换到UNIX时间戳,或者相反,转换UNIX时间戳到可读的日期和时间。 +> **问题**: 在Perl语言中,我需要转换易读的日期和时间到对应的UNIX时间戳,反之亦然。你可以给我一些将日期及时间转换到UNIX时间戳的Perl代码例子吗?或者相反,转换UNIX时间戳到可读的日期和时间。 -当你的Perl脚本需要解决时间信息,这里有两种方法来表示和处理日期和时间。一种方法是易读的时间表示(例,"Sat Mar 14 10:14:05 EDT 2015"),另外一种是使用UNIX时间戳(也叫“新纪元时间”),这是从1970年1月1日到今所消耗的时间秒数。每一种方法都有它自己的优劣势,取决于你的需要,也许也就需要转换一种格式到另一种。 +当你的Perl脚本需要解决时间信息,这里有两种方法来表示和处理日期和时间。一种方法是易读的时间表示(例,"Sat Mar 14 10:14:05 EDT 2015"),另外一种是使用UNIX时间戳(也叫“新纪元时间”),这是从1970年1月1日到今所经过的时间秒数。每一种方法都有它自己的优劣势,取决于你的需要,也许也就需要转换一种格式到另一种。 ### Perl中转换本地时间到UNIX时间戳 ### @@ -13,13 +13,14 @@ Linux有问必答:Perl中本地时间和UNIX时间戳间相互转换 - 14/Mar/15 10:14:05 - 14 Mar 15 10:14:05 - use Date::Parse; +``` +use Date::Parse; - my $local_time = "Sat Mar 14 10:14:05 EDT 2015"; +my $local_time = "Sat Mar 14 10:14:05 EDT 2015"; - # 1426342445 will be stored in $unix_time - my $unix_time = str2time($local_time); - +# 1426342445 will be stored in $unix_time +my $unix_time = str2time($local_time); +``` Date:Parse 模块支持多种语言(英语,法语,德语和意大利语)和时区。例如: use Date::Parse; @@ -28,10 +29,9 @@ Date:Parse 模块支持多种语言(英语,法语,德语和意大利语) my $lang = Date::Language->new('French'); my $unix_time = $lang->str2time("12:14:05, Ago 16, 2014 (CEST)"); -### Perl中UNIX时间戳到可读的日期和时间 ### +### Perl中UNIX时间戳到易读的日期和时间 ### - -如果你想要转换UNIX时间戳到可读的格式,可以使用localtime()函数,此函数可以转换UNIX时间戳为一个9元素列表。然后你可以使用返回的list构造任何你需要的可读格式。这里有一个代码片段: +如果你想要转换UNIX时间戳到易读的格式,可以使用localtime()函数,此函数可以转换UNIX时间戳为一个9元素列表。然后你可以使用返回的list构造任何你需要的可读格式。这里有一个代码片段: # $sec, $min, $hour: 秒,分,时 # $mday: 月中的某天 (0-31) @@ -55,7 +55,7 @@ via: http://ask.xmodulo.com/convert-local-time-unix-timestamp-perl.html 作者:[Dan Nanni][a] 译者:[VicYu/Vic020](http://vicyu.net) -校对:[校对者ID](https://github.com/校对者ID) +校对:[wxy](https://github.com/wxy) 本文由 [LCTT](https://github.com/LCTT/TranslateProject) 原创翻译,[Linux中国](http://linux.cn/) 荣誉推出