Re: PL/perl elog(ERROR) Does not Abort Transaction

On May 10, 2012, at 6:18 PM, Tom Lane wrote:

> I also tried this on a Fedora 16 box, which has
>
> $ perl -v
> This is perl 5, version 14, subversion 2 (v5.14.2) built for x86_64-linux-thread-multi
>
> Works fine there too...

Hrm…I've also just replicated it on CentOS 6.2 with Perl 5.10.1:

reputation=# begin;
BEGIN
Time: 22.330 ms
reputation=# do language plperlu $$ elog(ERROR, 'foo')$$;
ERROR:  foo at line 1.
CONTEXT:  PL/Perl anonymous code block
reputation=# select true;bool
------t
(1 row)

Time: 18.392 ms
reputation=# rollback;
ROLLBACK
Time: 19.854 ms
reputation=# do language plperlu $$elog(NOTICE, $^V)$$;
NOTICE:  v5.10.1
CONTEXT:  PL/Perl anonymous code block
DO
Time: 20.459 ms
reputation=# select version();                                                  version
                  

--------------------------------------------------------------------------------------------------------------PostgreSQL
9.1.3on x86_64-unknown-linux-gnu, compiled by gcc (GCC) 4.4.6 20110731 (Red Hat 4.4.6-3), 64-bit 
(1 row)

Perhaps there is something funky in my configuration, though I tried a few different things and couldn't get it to
change.I can show you on my laptop next week if you want to see it in person. Not sure if that will help… 

David