| 
View
 

TimestampInPerl

Page history last edited by David B 15 years, 11 months ago

 

my ($S,$M,$H,$d,$m,$y) = localtime(time);$y+=1900;$m++;
my $timestamp = sprintf("%04d%02d%02d%02d%02d%02d",$y,$m,$d,$H,$M,$S);

Comments (0)

You don't have permission to comment on this page.