我想比较日期08-08-2018和20-07-2018。
if (dt1 > $ dt2){
Success
}
请帮助我。
答案 0 :(得分:5)
核心
Time::Piece
模块
允许您使用strptime
类方法将日期/时间字符串转换为对象。可以使用您所描述的标准<
,>
,<=
,>=
和==
运算符并将其作为核心模块来比较生成的对象不太可能需要安装
这是一个简短的程序,使用问题中的值,将它们转换为Time::Piece
对象$dt1
和$dt2
,并按照您的描述进行比较
use strict;
use warnings 'all';
use feature 'say';
use Time::Piece;
my ($dt1, $dt2) = map { Time::Piece->strptime($_, '%d-%m-%Y') } qw/ 08-08-2018 20-07-2018 /;
if ( $dt1 > $dt2 ) {
say 'Success';
}
else {
say 'Failure';
}
Success
答案 1 :(得分:-1)
如果日期格式是静态的,则有两个简单的选择。
选项1
选项2
很抱歉,但是目前我无法为您提供示例代码。