Select Code to Download

#!/usr/bin/perl
#---------------------------------------------------------------------
# format_date.pl
...
}

exit 0;

formatting datetime: value =  1899-06-24 09:44:00, epoch = 18446744071
+484095456, date =  1899-06-24T09:44:00
formatting datetime: value =  1900-12-31 23:59:59, epoch = 18446744071
+532098815, date =  1900-12-31T23:59:59
formatting datetime: value =  1901-01-01 00:00:00, epoch =            
+978307200, date =  2001-01-01T00:00:00
...
formatting datetime: value =  2017-06-24 23:59:59, epoch =           1
+498348799, date =  2017-06-24T23:59:59
formatting datetime: value =  2018-06-24 09:44:00, epoch =           1
+529833440, date =  2018-06-24T09:44:00
formatting datetime: value =  2238-06-24 09:44:00, epoch =           8
+472332640, date =  2238-06-24T09:44:00