Pg module "eats" environment

Your name : Vitaly Piniygin
Your email address : <gambler(at)pfr(dot)ru>

System Configuration
---------------------
Architecture:
Operating System:

Linux 2.2.9 i686 unknown

FreeBSD 3.2-RELEASE i386

PostgreSQL version: PostgreSQL-6.5.1

Compiler used (example: gcc 2.8.0):
linux:
gcc version egcs-2.91.66 19990314/Linux (egcs-1.1.2 release)
fbsd:
gcc version 2.7.2.1

Please enter a FULL description of your problem:
------------------------------------------------

The Pg perl module seems to be broken in following way:
It "eats" environment after the database is opened and $0 perl variable is set
to some value ( see the script below).

Please describe a way to repeat the problem. Please try to provide a
concise reproducible example, if at all possible:
----------------------------------------------------------------------

~ $ export | grep PG
declare -x PGDATABASE="test"
declare -x PGHOST="host"
declare -x PGLIB="/usr/local/pgsql/lib"
declare -x PGPASSWORD="passwd"
declare -x PGUSER="user"
~ $ perl -e 'use Pg; $dbconn = Pg::connectdb(""); $0 = "name";\
system("echo\$PGUSER:\$PGDATABASE");'
:
~/projects/TD/assist $

If you know how this problem might be fixed, list the solution below:
---------------------------------------------------------------------

I'm a user, not perl-modules guru ;-)

----------------------------------

BG, Vit

E-Mail: Vitaly Piniygin <gambler(at)pfr(dot)ru>
Date: 12-Oct-99
Time: 15:09:56

----------------------------------