Help for this page

Select Code to Download


  1. or download this
    use strict;
use POSIX qw(strftime);
...
$today    = strftime("%d %m %Y %H:%M:%S", localtime(time));
print 'scalar     localtime: ', scalar localtime(time), "\n";
print "strftime'd localtime: $today\n";
  2. or download this
    Perl:      5.00503
POSIX:     1.02
...
strftime'd gmtime:    14 06 2005 12:18:04
scalar     localtime: Tue Jun 14 14:18:04 2005
strftime'd localtime: 14 06 2005 14:18:04