主页 / dba / 问题 / 64077
Accepted
peterh
Asked: 2014-04-29 06:10:59 +0800 CST

如何在 perl 中生成当前的 Oracle 时间戳？

  • 772

我使用 DBI。我想做一些像

INSERT INTO ... VALUES (the_generated_timestamp, ...);

命令是什么？它是如何创建的，perlocaltime标量值具有非常复杂的、针对人眼优化的格式（fe Mon Apr 28 15:58:51 2014）。我的目标有点像 unixgettimeofday()所做的（归还自 1970.1.1 以来的秒数），由一些格式字符串转换，我可以让 Oracle 吃掉它。

但任何更简单的解决方案也可以，如果存在的话。

它需要在 perl 中生成。INSERT ... (current_timestamp, ...)不行。

oracle perl

1 个回答

  1. Best Answer

    这样的事情会做：

    my ($second, $minute, $hour, $day, $month, $year, $weekday, $dayofyear, $dst) = localtime();

my $oracledatestring = sprintf "TO_DATE('%04d/%02d/%02d %02d:%02d:%02d', 'yyyymmdd HH24:MI:SS')", $year+1900, $month+1, $day, $hour, $minute, $second;

    ..给出类似的东西：

    TO_DATE('2014/04/28 16:34:34', 'yyyymmdd HH24:MI:SS')

    ...然后可以直接插入到 OracleDATE列中。

    老实说，所有的路都走了很长一段路。SYSDATE改为在您的INSERT陈述中使用。

    • 3

相关问题