use DateTime ;
my $now = DateTime->now->set_time_zone("UTC") ;
print $now->strftime("%s", time()) ;