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();