使用“ plperl”通过plperl pg_available_extensions从PostgreSQL过程/函数调用RESTful Web服务

如何解决使用“ plperl”通过plperl pg_available_extensions从PostgreSQL过程/函数调用RESTful Web服务

不确定如何（或在何处）运行“ plperl.on_init ='require REST :: Client';”在代码中？

下面的代码太累了：

CREATE OR REPLACE FUNCTION restful.get()
RETURNS text
LANGUAGE plperl
Security DEFINER
AS $function$
plperl.on_init='require REST::Client';
use REST::Client;
use Encode qw(encode);
my $client = REST::Client->new();
$client->getUseragent()->proxy( 'https','https://active.maxarmdm.com/semarchy/api/rest/query/Account/GD' ); 
$client->addHeader('Content-Type','application/json');      
$client->addHeader('Api-Key','9Yw_7lkj.ey3rUskhdfjk1VYZ1lskdfkT1A_pIxn');  
$client->GET('https://active.maxarmdm.com/semarchy/api/rest/query/Account/GD');  
return $client->responseContent();  
$function$

，我收到以下错误消息：

sql 错误[42601]：错误：无法在EOF的第2行修改标量分配中的串联（。）或字符串开始出错后不安全-在第3行中终止编译。其中：PL / Perl函数“ get”的编译

希望我只是把“ plperl.on_init ='require REST :: Client';”代码行放在错误的位置（在函数/存储过程中），和/或也许还有另一种方法可以运行-执行“ plperl.on_init ='require REST :: Client';”可能会消除该错误？