Início / dba / Perguntas / 64077
Accepted
peterh
Asked: 2014-04-29 06:10:59 +0800 CST

Como gerar o carimbo de data/hora atual do Oracle em perl?

  • 772

Eu uso DBI. E eu quero fazer alguns como

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

Qual é o comando? Como poderia ser criado, o valor escalar perl ocaltimetem um formato muito complexo, otimizado para olhos humanos (fe Mon Apr 28 15:58:51 2014). Meu objetivo era algo como o unix gettimeofday()faz (devolvendo os segundos desde 1970.1.1), convertido por alguma string de formato, que posso deixar comer pelo Oracle.

Mas qualquer solução mais simples também está bem, se existir.

Ele precisa ser gerado em perl. INSERT ... (current_timestamp, ...)não está bem.

oracle perl

1 respostas

  1. Best Answer

    Algo como isto fará:

    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;

    .. dando algo como:

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

    ... que pode então ser inserido diretamente em uma DATEcoluna do Oracle.

    Tudo um pouco longe, para ser honesto. Em vez disso, use SYSDATEem suas INSERTdeclarações.

    • 3

relate perguntas