Perl获得BST（伦敦）时间或任何其他时间

Question

在Perl中 我如何获得当前的伦敦时间？ GMT与BST相抵 是否有可能获得TZ偏移或时间本身为不同的时区
来自纽约Red Hat Linux机器？
- 谢谢很多

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)