use DateTime;
my $dt = DateTime->now(time_zone => "EST5EDT") ;
say $dt->hour ;
9