Excerpts from Alex Hunsaker's message of lun jul 26 12:55:34 -0400 2010:
> On Mon, Jul 26, 2010 at 03:58, mile <mile(at)avangardsolutions(dot)com> wrote:
> > To reproduce this use the following function:
> >
> > create or replace function perl_shared() returns void as $$
> > use strict;
> > elog(INFO, $_SHARED{'stuff'});
> > $_SHARED{'stuff'} = '1';
> > for my $k (keys %_SHARED)
> > {
> > elog(INFO, $k);
> > }
> > $$ language plperl;
>
> Great, Thanks! The below patch fixes it for me.
Thanks, applied to 9.0 and HEAD. I added a simple regression test too.