如何比较“Fri Jul 1 05:21:23 2016” perl中的datetime格式 [英] How to compare "Fri Jul 1 05:21:23 2016" datetime format in perl
本文介绍了如何比较“Fri Jul 1 05:21:23 2016” perl中的datetime格式的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我的日期时间值格式为Fri Jul 1 05:21:23 2016,我该如何比较?
I have a datetime value in the format "Fri Jul 1 05:21:23 2016", how can i compare this?
我需要像 if($ date1< $ date2){打印做某事!
请帮助找到答案!
推荐答案
您可以使用 DateTime :: Format :: Strptime
将字符串解析为 日期时间
支持比较的对象:
You could use DateTime::Format::Strptime
to parse the strings into Datetime
objects that support comparisons:
use strict;
use warnings;
use feature 'say';
use DateTime::Format::Strptime;
my $strp = DateTime::Format::Strptime->new(pattern => '%a %b %d %H:%M:%S %Y');
my $dt1 = $strp->parse_datetime("Fri Jul 1 05:21:23 2016");
my $dt2 = $strp->parse_datetime("Sat Jul 2 05:21:23 2016");
if ($dt1 < $dt2) { # or use DateTime->compare()
say '$dt1 < $dt2';
}
elsif ($dt1 == $dt2) {
say '$dt1 == $dt2';
}
else {
say '$dt1 > $dt2';
}
这篇关于如何比较“Fri Jul 1 05:21:23 2016” perl中的datetime格式的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文