我正在寻找一些关于如何正确执行此操作的Perl帮助.我不介意使用库来做到这一点.
我正在从mySQL数据库中提取UTC时间戳,格式为:2012-02-06 13:50:09
我需要Perl来拉取当前的UTC时间,并在几分钟(或几秒)内获得两个时间戳之间的差异.我在Unix子进程中这样做,但是我很难获得UTC时间并进行比较,因为本地盒子在东部时间运行.我不介意在Unix时间这样做,但不确定如何准确地将UTC时间与"last_timestamp"进行比较,后者是来自mysql的基于UTC的时间戳.
my $date_diff = qx(date -d "\$(date +'%F %T')" +%s) -
qx(date -d "$last_timestamp" +%s);
Run Code Online (Sandbox Code Playgroud)
一如既往,您的帮助肯定受到赞赏和重视.