aboutsummaryrefslogtreecommitdiff
path: root/src/pl/plperl/expected/plperl_init.out
blob: dca5d8f0ec660ca33ce73a67eedc969ec54df150 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
-- test plperl.on_plperl_init errors are fatal
-- Avoid need for custom_variable_classes = 'plperl'
LOAD 'plperl';
SET SESSION plperl.on_plperl_init = ' eval "1+1" ';
SHOW plperl.on_plperl_init;
 plperl.on_plperl_init 
-----------------------
  eval "1+1" 
(1 row)

DO $$ warn 42 $$ language plperl;
ERROR:  'eval "string"' trapped by operation mask at line 2.
CONTEXT:  while executing plperl.on_plperl_init
PL/Perl anonymous code block