我将数据存储在 mySQL 表中的列类型“时间戳”下,我想将其输出为符合 RFC-822 的日期,以包含在有效的 RSS 提要中。
我知道如何使用 perl 将当前时间简单地输出为 RFC-822 对象,但我还没有弄清楚如何转换现有字符串。字符串格式如下:YYYY-MM-DD HH:MM:SS
这就是最终为我工作的东西:
use POSIX qw( strftime );
...
$timestamp =~ /^(\d{4})-(\d{2})-(\d{2}) (\d{2}):(\d{2}):(\d{2})$/;
$rssTS = strftime('%a, %d %b %Y %T %Z', $6, $5, $4, $3, $2 - 1, $1 - 1900, -1, -1, -1);
我想知道CPAN 在这里有帮助吗?DateTime::Format::DateParse怎么样?