Select Code to Download

#!/usr/bin/perl
use Time::Local qw(timelocal timegm timegm_nocheck);
...
        print $cDatetime;

}

[denzil@local ~]# perl 1.pl
2014-10-10 12:16:12
[denzil@local ~]# date
Fri Oct 10 11:16:13 GMT 2014
[root@cjjeiprodb ~]#