- 1
- 2
- 3
- 4
use Date::Calc qw (Delta_Days);
use strict;
my $delta = Delta_Days(1601, 1, 1, 2008, 8, 12);
print "Delta is $delta\n";
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−125
use Date::Calc qw (Delta_Days);
use strict;
my $delta = Delta_Days(1601, 1, 1, 2008, 8, 12);
print "Delta is $delta\n";
дни нашей жизни
Комментарии (0) RSS
Добавить комментарий