如何將DateTime對象轉換爲HTTP格式？

Question

我使用DateTime Perl模塊來獲取特定時區的時間。時的結果如下

2010-09-24T02：18：52

我怎麼能在打印之前將其轉換爲HTTP格式？

Answer 1

CPAN有你所需要的：DateTime::Format::HTTP。

描述：

該模塊提供了處理[使用]通過HTTP協議使用的日期格式（然後更多一些）功能。

簡介：

use DateTime::Format::HTTP; 

my $class = 'DateTime::Format::HTTP'; 
$string = $class->format_datetime($dt); # Format as GMT ASCII time 
$time = $class->parse_datetime($string); # convert ASCII date to machine time 

更新

您可以在源數據的時區通過，使用日期時間set_time_zone()更改時區，然後用 strftime生成字符串採用'HTTP'格式。例如：（刪除了清晰的行號。）

my $dt = DateTime::Format::HTTP->parse_datetime('2010-03-09T12:34:56', 'EST'); 
warn $class->format_datetime($dt); 
warn $dt->strftime("%a, %d %b %Y %H:%M:%S %Z"); 
$dt->set_time_zone('CET'); 
warn $dt->strftime("%a, %d %b %Y %H:%M:%S %Z"); 

Tue, 09 Mar 2010 17:34:56 GMT 
Tue, 09 Mar 2010 12:34:56 EST 
Tue, 09 Mar 2010 18:34:56 CET