在postgresql中使用plperl语言调用restful

Question

我在postgresql中安装了plperl语言，以便使用函数将restful请求发送到api端点。我的职能如下

CREATE OR REPLACE FUNCTION sdpmtn_mt.sendnotification(
)
RETURNS text
LANGUAGE 'plperl'
COST 100
VOLATILE SECURITY DEFINER PARALLEL UNSAFE
AS $BODY$
plperl.on_init='require REST::Client';
use REST::Client;
use Encode qw(encode);
my $client = REST::Client->new(); 
$client->getUseragent()->proxy( 'https', 'https://xdmactive.maxarmdm.com:8443//test    /test'); -- # use4 proxy authentication
$client->addHeader('Content-Type', 'application/json');  --   # headers
$client->addHeader('Api-Key', '9Yw_jmh.ey3rUlkzjsdueliokT1A_kh');  # headers
$client->GET('https://xdmactive.maxarmdm.com:8443/semarchy/api/rest/query/test/test'); -- # encoding
return $client->responseContent(); 
$BODY$;

ALTER FUNCTION sdpmtn_mt.sendnotification()
OWNER TO postgres;

而错误是

错误:不能修改第2行标量赋值中的常量项，在错误发生后在EOF处开始不安全-编译在第3行中止。上下文:编译PL/Perl函数的"sendnotification“SQL状态: 42601

。

Answer 1

plperl.on_init是一个PostgreSQL配置参数，而不是PostgreSQL变量。您将在PostgreSQL.conf文件中设置它。