Perl获取BST (伦敦)时间或任何其他时间

Question

在Perl中

如何获取当前伦敦时间？GMT具有BST偏移量

是否可以获取不同时区的TZ偏移量或时间本身

从纽约的Red Hat Linux机器上？

-Thanks much

Answer 1

use DateTime;
say  "UTC:\t\t"      . DateTime->now->iso8601;
say "London time:\t" . DateTime->now->set_time_zone("Europe/London")->iso8601;

UTC:            2011-04-24T17:45:16
London time:    2011-04-24T18:45:16

Answer 2

使用DateTime模块。他们有各种各样的日期和时间计算工具，包括时区支持。

Time Zones常见问题解答将帮助您开始解决常见的时区问题。

Answer 3

在标准Perl中：

% env TZ=Europe/London date
Sun Apr 24 19:51:24 BST 2011

% env TZ=Europe/London perl -le 'print scalar localtime'
Sun Apr 24 19:51:37 2011

% env TZ=Europe/London perl -MPOSIX=strftime -le 'print strftime "%x %X %Z (%z)", localtime'
04/24/11 19:51:52 BST (+0100)