如何在 Perl & 中根据日期时间比较两个字符串php？

Question

我有（日期时间）格式的字符串 - “Mon, 11 Jul 2011 11:45:07 +08:00”，我需要根据日期时间格式比较此类字符串，以查找最新的字符串。我应该在这里使用哪个模块/方法？

Answer 1

use DateTime::Format::Strptime qw();

my $time_str = 'Mon, 11 Jul 2011 11:45:07 +08:00';
# your notation of time zone
# does not comply with relevant standards
$time_str    =~ s/([+-]\d\d):(\d\d) \z/$1$2/msx; # kill colon

my $parser   = DateTime::Format::Strptime->new(
    pattern  => '%a, %d %b %Y %T %z',
    locale   => 'en',   # 'Mon', 'Jul' are English
    on_error => 'croak',
);

my $datetime = $parser->parse_datetime($time_str);

# Now you have a DateTime object. To compare,
# use the overloaded relation operators.
# <=> operator/sort function works as well.

if ($datetime < $a_different_datetime) {
    say 'earlier';
}

Answer 2

我在 Perl 中使用 Date::Manip为了这：

use Date::Manip;

my $datestr1 = "Mon, 11 Jul 2011 11:45:07 +08:00";
my $datestr2 = "Mon, 18 Jul 2011 11:45:07 +08:00";

my $date1 = new Date::Manip::Date;
my $date2 = $date1->new_date;
$date1->parse($datestr1);
$date2->parse($datestr2);

my $result = $date1->cmp($date2); # => -1, 0, 1

print $result, "\n";

Answer 3

对于 PHP，最简单的方法是使用 strtotime() 转换时间字符串并比较整数值。最大的整数是最新的。

请注意，如果您未设置默认时区，某些版本的 PHP 会在使用日期函数时向您发出警告。您可以使用 date_default_timezone_set("") 或 php.ini 的 date.timezone = "" 以及 支持的时区列表。

Answer 4

在 PHP 中，称为 strtotime()

Answer 5

您可以在您拥有的时间戳上尝试 strtotime() 。然后只需使用普通比较器比较数字即可。