[Moscow.pm] Синтаксис работы с датами

[Андрей Асякин]

Не косяк, а фича.

В Panda::Date $date1 - $date2 дает объект класса Panda::Date::Int, а не 
Panda::Date::Rel.
И в этом Panda::Date отличается от Class::Date, смотри
https://metacpan.org/pod/distribution/Panda-Date/lib/Panda/Date.pod#Class::Date-INCOMPABILITIES
Наверно, это правильней..

Я не такой продвинутый вычиталель дат, навскидку вот так работает

perl -Mstrict -MPanda::Date=date -E 'my $dt = date; my $dt2 = $dt + "1y 
3h";
say +($dt2 - $dt)->relative'

или так

Panda::Date::Rel->new($d1, $d2)


Тут есть, кто может объяснить, как задумано.

ЗЫ.
У меня одного gmail рассылку в спам кладет?


On 06/30/2016 03:05 PM, Alexey Shrub wrote:
>
> On Чт, июн 30, 2016 в 12:10 , Андрей Асякин <asan999 на gmail.com> wrote:
>> Panda::Date все ж таки рекомендую. dt1 in (dt2..dt3) естественно, нет.
>
> косяк в нём какой-то
> perl -E 'use strict;use Data::Dumper;use Panda::Date qw(date); my $dt1 
> = date "2016-06-30 13:00"; my $dt2 = date "2016-06-30 13:20"; my 
> $duration = ($dt2 - $dt1); say ($dt2-$duration);'
> Panda::Date: cannot '-' unsupported object type at -e line 1.