Perlの仕事を離れて久しく、MySQLの使用で久々にエポック秒
(1970年1月1日0時0分0秒からの秒数)をこねくり回す機会がやってきた。
いや、MySQLだからでない、リプレース前のシステムが Perl だからだ。
MySQL なら、例えば、こんなかんじ、
select UNIX_TIMESTAMP(SYSDATE()) from dual
でエポック秒を取得、逆は、FROM_UNIXTIME(秒数)
Oracle なら、、
select SYS_EXTRACT_UTC(TIMESTAMP '2009-07-22 10:00:00.0 +09:00') from dual
あるいは、
(SYSDATE - TO_DATE('1970-01-01 00:00:00', 'YYYY-MM-DD HH24:MI:SS')) * 24 * 60 * 60)
こんなこと、すれば良いのだっけ。。Oracleの仕事じゃ使いそうもないなあ。。。
エポック秒を使うこと自体がイケテナイ気がするのだが。