![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png){kind=small}
летнее время, мать его
Jun. 18th, 2004 06:02 pmuse Time::localtime;
use Time::Local;
print localtime( timelocal(0,0,0,1,0,2004) + $week*7*24*60*60 )->hour
При $week большем 12 и меньшем 44 это печатает 1, а вовсе не 0, как могло бы показаться. А надо чтобы для любой недели был 0. Что делать -- пока не придумал. Ясно только, что операция "прибавить n суток" вовсе не эквивалентна "прибавить n*24*60*60 секунд".
use Time::Local;
print localtime( timelocal(0,0,0,1,0,2004) + $week*7*24*60*60 )->hour
При $week большем 12 и меньшем 44 это печатает 1, а вовсе не 0, как могло бы показаться. А надо чтобы для любой недели был 0. Что делать -- пока не придумал. Ясно только, что операция "прибавить n суток" вовсе не эквивалентна "прибавить n*24*60*60 секунд".
