Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Time

From: philb:upnaway at: 6-Aug-2001 15:16

Hi John, I'm sure there is better way of doing it but you can try this ..... rebol [] fn-epoch: func [ip-date [date!]] [ lv-days: ip-date/date - 01-Jan-1970 return (lv-days * 86400) + (ip-date/time/hour * 3600) + (ip-date/time/minute * 60) + ip-date/time/second ] ; test print fn-epoch 21-Feb-2000/14:23:07 halt HTH Cheers Phil -- Original Message -- I would like to display the EPOCH date -you know, in seconds since Jan 1, 1970. Example '951142987 is the epoch for 21 Feb. 2000 Dummies says that it is easy, but doesn't tell you how. /john