Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    use Date::Manip;
    ...
    $localtime = "1362112603";
    printf("%s:%s:%s\n", $localtime, scalar localtime( $localtime ), UnixD
    +ate( scalar localtime( $localtime ), qq{%Y-%m-%d %H:%M:%S} ) );
    
  2. or download this
    WARNING: [printf] Object must contain a valid date
    Missing argument in printf at /tmp/time.pl line 8.
    1349541878:Sun Oct  7 02:14:38 2012:
    1362112603:Fri Mar  1 14:06:43 2013:2013-03-01 14:06:43