))) А так? perl -E 'use Panda::Date qw(date); my $dt1 = date "2016-06-30 13:00"; my $dt2 = date "2016-06-30 13:20"; say 1 if ($dt2 == $dt1);'
2016-06-30 14:25 GMT+03:00 Alexey Shrub <[email protected]>: > On Чт, июн 30, 2016 в 12:10 , Андрей Асякин <[email protected]> wrote: >> >> Panda::Date > > > Видимо я что-то делаю не так, но не пойму что > perl -E 'use Panda::Date qw(date); my $dt1 = date "2016-06-30 13:00"; my > $dt2 = date "2016-06-30 13:20"; say 1 if (dt2 == dt1);' > тоже возвращает 1, хотя даты не равны > > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org -- Vladimir Timofeev <[email protected]> -- Moscow.pm mailing list [email protected] | http://moscow.pm.org
