LINUX.ORG.RU
Форум — Development  

Perl: помогите с отсчетом от даты


0

0

нужно написать два простеньких скриптика, которые при выполнении выдают сколько дней осталось до определенной даты и второй - сколько дней прошло с определенной даты. Чет попытался сам сообразить... не вышло:(

★★★
← Книги по UMP OOD OOP
Postgresql utf8 ilike →

Хотя бы и так:
use Date::Calc qw(Delta_Days);
my $days = Delta_Days( 2006,07,20,
2006,07,22);
print "Осталось $days дней\n";

Waso ★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
← Книги по UMP OOD OOP
Development
Postgresql utf8 ilike →