Блог

Главная - Вопросы по программированию - Преобразование даты ДД / ММ / ГГГГ в 7-значную юлианскую дату в Perl

Преобразование даты ДД / ММ / ГГГГ в 7-значную юлианскую дату в Perl

#perl #julian-date

#perl #юлианская дата

Вопрос:

Я раньше не использовал юлианскую дату и не имел с ней опыта. Я не знаю, как нужно преобразовать 7-значную цифру или есть ли библиотека, которая это делает.

Мне нужна помощь с 10/10/2020 для преобразования в 2459133 в Perl.

Комментарии:

1. metacpan.org/pod/Date::Julian::Simple

2. Спасибо. Он работает и возвращает 2459132.5

3. @Pierre: Установка модуля CPAN кажется ненужной, когда Time::Piece выполнит свою работу.

Ответ №1:

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;