#!/usr/bin/perl -w use strict; use Date::Calc qw( Today Today_and_Now Date_to_Days Add_Delta_Days ); use CGI qw(:standard); my $datetime = sprintf("%4d-%02d-%02d %02d:%02d:%02d.000",Today_and_No +w()); # prints on this format : 2011-06-08 21:26:23.000
In reply to Wrong time issue help! by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |