BUG #3405: plperl_elog - regression test fails

The following bug has been logged online:

Bug reference: 3405
Logged by: Dhanaraj M
Email address: Dhanaraj(dot)M(at)Sun(dot)Com
PostgreSQL version: 8.2.4
Operating system: Solaris 10
Description: plperl_elog - regression test fails
Details:

I think "pl/plperl/expected/plperl_elog.out" file has to be updated. (or
it's a problem on my side)
I notice this problem only with 8.2.x and not with 8.1.x. Did anybody notice
this bug?

bash-3.00$ diff -c ../../pl/plperl/expected/plperl_elog.out
results/plperl_elog.out
*** ../../pl/plperl/expected/plperl_elog.out Wed Mar 15 04:18:23 2006
--- results/plperl_elog.out Fri Jun 15 13:15:59 2007
***************
*** 38,47 ****
ERROR: creation of Perl function failed: Global symbol "$global" requires
explicit package name at line 3.
Global symbol "$other_global" requires explicit package name at line 4.
select uses_global();
! ERROR: function uses_global() does not exist
LINE 1: select uses_global();
^
- HINT: No function matches the given name and argument types. You may need
to add explicit type casts.
SET plperl.use_strict = false;
create or replace function uses_global() returns text language plperl as
$$

--- 38,47 ----
ERROR: creation of Perl function failed: Global symbol "$global" requires
explicit package name at line 3.
Global symbol "$other_global" requires explicit package name at line 4.
select uses_global();
! ERROR: function uses_global() does not exist at character 8
! HINT: No function matches the given name and argument types. You may need
to add explicit type casts.
LINE 1: select uses_global();
^
SET plperl.use_strict = false;
create or replace function uses_global() returns text language plperl as
$$