0
Вот код:Date :: ICal тайна (час не возвращает правильное значение
$ical = Date::ICal->new(year => 1964, month => 10, day => 16,
hour => 20, min => 12, sec => 47,
#tz => '0530'
);
ok(defined $ical, 'new() returned something');
ok($ical->isa('Date::ICal'), " and it's the right class");
is($ical->sec, 47, ' sec()' );
is($ical->min, 12, ' min()' );
is($ical->hour, 20, ' hour()' );
is($ical->day, 16, ' day()' );
is($ical->month, 10, ' month()');
is($ical->year, 1964, ' year()' );
print "hour = " . $ical->hour . "\n";
и вот результат:
1..8
ok 1 - new() returned something
ok 2 - and it's the right class
ok 3 - sec()
ok 4 - min()
not ok 5 - hour()
# Failed test ' hour()'
# at ./test_more.pl line 17.
# got: '0'
# expected: '20'
not ok 6 - day()
# Failed test ' day()'
# at ./test_more.pl line 18.
# got: '17'
# expected: '16'
ok 7 - month()
ok 8 - year()
hour = 0
# Looks like you failed 2 tests of 8.
что дает ????
Я на самом деле на 5 часов позади, но не должен ли я получить часы назад в моем tz, если его не указано? (вот почему прокомментировал атрибут tz) – ennuikiller
Вы были на 4 часов меньше UTC по состоянию на 16.10.1964? – mob
Хороший вопрос, да на самом деле я догадываюсь, что я был ...... – ennuikiller