use DateTime;
my $dt = DateTime->now( time_zone => 'Europe/London' );
say $dt->strftime('%Y-%m-%d %H:%M:%S');