日期时间::活动::日出问题

时间:2010-12-22 08:08:37

标签: perl datetime

为什么那个剧本说日出是在04:11:20 - 这个时候应该是黑夜。 DateTime::Event::Sunrise

#!/usr/bin/env perl
use warnings;
use 5.012;
use DateTime;
use DateTime::Event::Sunrise;

my $dt = DateTime->new( year => 2010, month => 12, day => 22, time_zone => 'CET' );

my $sunrise_span = DateTime::Event::Sunrise ->new (
                    longitude => '48',
                    latitude =>  '16',
                    altitude =>  '-0.833',
                    iteration => '1' );

my $both_times = $sunrise_span->sunrise_sunset_span( $dt );

say "Sunrise is: " , $both_times->start->datetime;
say "Sunset is: " , $both_times->end->datetime;

# Sunrise is: 2010-12-22T04:11:20  
# Sunset is: 2010-12-22T15:22:01

1 个答案:

答案 0 :(得分:2)

在中欧时间,给定的时间绝对正确,因为您指定的纬度和经度(在也门)。虽然也门是UTC + 3,但在当地时间,日出时间是6:11,日落时间是17:22。

你打算在哪里计算日出和日落?