my $time = DateTime->new(
    year   => 2007,
    month  => 12,
    day    => 28,
    hour   => 18,
    minute => 30,
    second => 0,
    time_zone => 'America/New_York',
);