Доступ к функции current_settings в функции plperl в Postgres

Question

Я пишу свою первую функцию plperl в Postgres, и мне нужно получить доступ к некоторым значениям в области current_settings() (с помощью этого вызова) - и мне интересно, как лучше всего это сделать?

В plpgsql я могу сделать что-то вроде:

DECLARE
  cid int;
BEGIN
  select nullif(current_setting('jwt.claims.customerId', true), '') :: int into cid;
END ...

Просто интересно узнать об эквиваленте доступа к системным функциям, таким как current_setting в скрипте Perl plperl.

Спасибо!

Answer 1

Используйте одну из функций доступа к базе данных, например:

$rv = spi_exec_query("select nullif(current_setting('jwt.claims.customerId', true), '')::int as cid");
$cid = $rv->{rows}[0]->{cid};