1

在 plperl 中编写 Postgres 函数（存储过程）时，我了解到无法加载诸如“use Time::Piece;”之类的 perl 模块。鉴于此，在 plperl 中处理日期/时间操作和比较的最佳方法是什么？使用 plperlu 和加载模块对我来说不是一个选项。

我不得不求助于以下查询：

$query = "SELECT extract(day from timestamp '$eventDate') AS day,
                 extract(month from timestamp '$eventDate') AS month,
                 extract(year from timestamp '$eventDate') AS year";

我还使用 SQL 将时间戳转换为纪元时间，以便在 perl 中进行比较。我希望这是一个愚蠢的问题，并且有一种更直接和简单的方法来处理日期/时间功能。谢谢。

4

2 回答 2

0

几乎任何 Postgres 数据库框架都会自动为您转换 Date 和 DateTime 数据类型。并且在将这些类型插入 Postgres 时，如果它们没有自动转换，那么 UTC 格式是 Postgres 始终可以理解的格式。

更新

根据随后的评论，我只能参考有据可查的日期/时间函数列表，因为问题中没有具体说明所需的操作类型：Postgres Date/Time Functions and Operators

于 2015-08-06T23:38:16.147 回答
0

没有一个简单的方法可以做到这一点。您有四个基本选项，使用哪个取决于您的具体情况。

  1. 在存储过程中使用 SQL。

    这通常比我喜欢的更冗长，但它可能是最简单和最有效的。例子：

    my $now = spi_exec_query('SELECT EXTRACT(epoch FROM NOW())')->{rows}[0]->{date_part}
    || die "Unable to determine current time";

    或一次用于多个值：

    my $row = spi_exec_query('SELECT EXTRACT(...) AS a,EXTRACT(...) AS b,... AS x')->{rows}
    or die "Some useful message...";
my $a = $row->{a};
my $b = $row->{b};
...
my $x = $row->{x};

  2. 使用 SQL 或 plpgsql 存储过程包装您的 plperl SP，该存储过程传入​​所需的日期值：

    CREATE FUNCTION foo AS $$
    SELECT foo_pl(EXTRACT(...),EXTRACT(...),...)
$$ LANGUAGE SQL;

  3. 在 perl 中手动进行日期操作。

    这通常很丑陋（以及为什么首先存在日期操作模块！）但可能适用于足够简单的操作，其中闰年、时区等无关紧要（在时间跨度上增加一个小时或一天等） ）。

  4. 需要更复杂的 perl 模块，例如DateTime。

    这通常需要使用 plperlu，而不是标准的 plperl，这可能会带来一些安全问题。将如此大的模块加载到存储过程中也不太可能提高性能。但是，如果您有足够的系统内存，并且您对 plperlu 的安全问题感到满意（本文未涉及），则可以选择它。

于 2015-08-07T16:58:56.213 回答