2010-07-30 6 views
0

을 반환하지 않는 것은 코드입니다 :날짜 : 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. 

????

답변

1

인가주는 무슨 시간대에 문제가 있습니까? 정확히 4 시간 뒤 UTC입니까?

+0

실제로 5 시간 뒤이지만 지정되지 않은 경우 시간을 다시 받아야하지 않아야합니까? tz 속성을 주석 처리했습니다.) – ennuikiller

+0

1964 년 10 월 16 일 기준으로 UTC보다 4 시간 늦습니까? – mob

+0

좋은 질문입니다. 사실 제가 그렇다고 생각합니다 ...... – ennuikiller