Postgresql 中文操作指南

45.7. PL/Perl Event Triggers #

可以使用 PL/Perl 编写事件触发器函数。在事件触发器函数中，哈希引用 $_TD 包含有关当前触发器事件的信息。$_TD 是全局变量，对于触发器的每次调用都会获取一个单独的本地值。$_TD 哈希引用的字段为：

  • $_TD→{event}

    • 触发器被触发的事件的名称。

  • $_TD→{tag}

    • 触发器被触发的命令标记。

将忽略触发器函数的返回值。

以下是一个事件触发器函数示例，说明上述的部分内容：

CREATE OR REPLACE FUNCTION perlsnitch() RETURNS event_trigger AS $$
  elog(NOTICE, "perlsnitch: " . $_TD->{event} . " " . $_TD->{tag} . " ");
$$ LANGUAGE plperl;

CREATE EVENT TRIGGER perl_a_snitch
    ON ddl_command_start
    EXECUTE FUNCTION perlsnitch();