PL/Perl 触发器不能使用 .bashrc 中定义的 ENV 变量

Question

我正在尝试在postgresql的PL/perl触发器中使用环境变量(例如HOME(，它似乎是空的。

在终端中运行printenv | grep HOME返回所需的路径。

我将触发器定义为

CREATE EXTENSION IF NOT EXISTS plperlu;
CREATE OR REPLACE FUNCTION update_solved() RETURNS trigger AS $update_solved$
  elog(NOTICE, "Hello");
  elog(NOTICE, $ENV{'HOME'});
  return;
$update_solved$ LANGUAGE plperlu;

当查询激活触发器时，我得到输出

NOTICE:  Hello
NOTICE: 

我检查了脚本中包含 %ENV 的内容(使用 use Data::Dumper; elog(NOTICE, Dumper(%ENV)); ：

$VAR1 = 'LANG';
$VAR2 = 'en_US.UTF-8';
$VAR3 = 'LC_TIME';
$VAR4 = 'C';
$VAR5 = 'LC_MONETARY';
$VAR6 = 'C';
$VAR7 = 'PGSYSCONFDIR';
$VAR8 = '/etc/postgresql-common';
$VAR9 = 'PG_GRANDPARENT_PID';
$VAR10 = '513';
$VAR11 = 'PGLOCALEDIR';
$VAR12 = '/usr/share/locale';
$VAR13 = 'LC_CTYPE';
$VAR14 = 'en_US.UTF-8';
$VAR15 = 'LC_COLLATE';
$VAR16 = 'en_US.UTF-8';
$VAR17 = 'PGDATA';
$VAR18 = '/var/lib/postgresql/9.6/main';
$VAR19 = 'LC_MESSAGES';
$VAR20 = 'en_US.UTF-8';
$VAR21 = 'LC_NUMERIC';
$VAR22 = 'C';
$VAR23 = 'PWD';
$VAR24 = '/var/lib/postgresql';
$VAR25 = 'PG_OOM_ADJUST_FILE';
$VAR26 = '/proc/self/oom_score_adj';

您知道如何设置我需要的在终端会话中定义的 env 变量以在 PL/perl 触发器中使用吗？

Answer 1

尽管您正确地调用了 PL/Perl 的不受信任的 plperlu 变体，但初始环境仍然是与普通"受信任"PL/Perl 相同的受限环境。

一种解决方案是运行一个子外壳，然后初始化其环境。像这样：

my $home = `bash -lc "echo $HOME"`;

您可能需要调整参数以 bash 以获得您想要的东西。上面的命令明确运行 bash，因为我不确定您将拥有什么默认 shell，并且您提到了您的 .bashrc，因此可能需要 -l 来确保它被读取。

您还可以从系统上的任意文本文件中显式读取所需的信息，这可能比弄乱环境变量更容易。