You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
use DateTime;
|
|
use DateTime::TimeZone;
|
|
|
|
#my $timezone_name = 'America/New_York';
|
|
my $timezone_name = 'UTC';
|
|
|
|
my $dt = DateTime->now(time_zone => $timezone_name);
|
|
my $offset = $dt->offset();
|
|
|
|
print "Timezone: $timezone_name\n";
|
|
print "Offset: $offset seconds\n";
|