C#
C++ (7)
Delphi (604)
Java (8)
JavaScript (55)
perl (40)
mysql (3)
perl CGI (3)
php (12)
VBScript (1)
Visual Basic (1)
Exchange Links
About this site
perl code to generate a time stamp for a unique file name
3 comments. Current rating: 
(1 votes). Leave comments and/ or rate it.
Question:
I need some perl code to generate a time stamp for a unique file name. Can you help out?Answer:
Use the function below which returns a date/ time as a string.The first line shows how to use the function.
 |  | |
$unique_filename = '~/report_' . get_timestamp(); sub get_timestamp { ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); if ($mon < 10) { $mon = "0$mon"; } if ($hour < 10) { $hour = "0$hour"; } if ($min < 10) { $min = "0$min"; } if ($sec < 10) { $sec = "0$sec"; } $year=$year+1900; return $year . '_' . $mon . '_' . $mday . '__' . $hour . '_' . $min . '_' . $sec; } | ||
 |  |
Comments:
