在Perl中将DD / MM / YYYY日期转换为7位朱利安日期

如何解决在Perl中将DD / MM / YYYY日期转换为7位朱利安日期

我以前没有使用过儒略历，也没有经验。我不知道7位数字需要如何转换，或者是否有执行此操作的库。

在Perl中，我需要10/10/2020的帮助才能转换为2459133。

解决方法

Time::Piece是标准Perl库的一部分。

#!/usr/bin/perl

use strict;
use warnings;
use feature 'say';

use Time::Piece;

# Get a Time::Piece object from your date string
my $d = Time::Piece->strptime('10/10/2020','%d/%m/%Y');

# Call its julian_day() method.
say $d->julian_day;