$ perl -MDateTime -e 'print DateTime->now(timezone=>"EST5EDT")->hour'
Found extra parameters passed to _check_named_from_epoch_params: [timezone]

Trace begun at (eval 241) line 155
DateTime::_check_named_from_epoch_params('epoch', 1680269935, 'timezone', 'EST5EDT') called at /usr/local/lib64/perl5/DateTime.pm line 493
DateTime::from_epoch('DateTime', 'epoch', 1680269935, 'timezone', 'EST5EDT') called at /usr/local/lib64/perl5/DateTime.pm line 545
DateTime::now('DateTime', 'timezone', 'EST5EDT') called at -e line 1

##</code><code>##

$ perl -MDateTime -e 'print DateTime->now(time_zone=>"EST5EDT")->hour'
9