Universal Timeを文字列に変換する - lisp-cookbook-ja/common-lisp GitHub Wiki

日付と時刻

Universal Timeを文字列に変換する

ライブラリで提供されていることも多い。ライブラリ:KMRCL等

(multiple-value-bind (sec min hr day mon year dow daylight-p zone)
    (decode-universal-time 3436143023)
  (declare (ignore daylight-p zone))
  (format nil "~[Mon~;Tue~;Wed~;Thu~;Fri~;Sat~;Sun~] ~d ~[Jan~;Feb~;Mar~;Apr~;May~;Jun~;Jul~;Aug~;Sep~;Oct~;Nov~;Dec~] ~d ~2,'0d:~2,'0d:~2,'0d"
          dow
          day
          (1- mon)
          year
          hr min sec))
;=> "Thu 20 Nov 2008 13:10:23"
(format nil "~{~A~^-~}" (reverse 
                       (butlast 
                        (multiple-value-list 
                            (decode-universal-time 3436143023))
                        3)))
;=> "2008-11-20-13-10-23"
⚠️ **GitHub.com Fallback** ⚠️