use DateTime;
my $date = DateTime->now(time_zone=>'GB', locale => 'en_GB');
print "today is $date";