Help for this page

Select Code to Download


  1. or download this
    ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) =  gmtime(time);
my $gm_time = timegm($sec,$min,$hour,$mday,$mon,$year,$wday,$yday);
  2. or download this
    my $gm_time = time;
  3. or download this
    use POSIX 'strftime';
print strftime '%Y-%m-%d %H:%M:%S', gmtime time - (5 * 3600);