Thread

Re: [BUGS] Pg module "eats" environment

Edmund Mergl <e.mergl@bawue.de> — 1999-10-12T18:38:05Z

Vitaly Piniygin wrote:
> 
> Your name               :  Vitaly Piniygin
> Your email address      :  <gambler@pfr.ru>
> 
> System Configuration
> ---------------------
>   Architecture:
>   Operating System:
> 
> Linux 2.2.9 i686 unknown
> 
> FreeBSD 3.2-RELEASE i386
> 
>   PostgreSQL version:   
> 
>   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@pfr.ru>
> Date: 12-Oct-99
> Time: 15:09:56
> 
> ----------------------------------
> 
> ************


this is on RH6.0 with PostgreSQL-6.5.2:

mergl@sls> export | grep PG
declare -x PGDATABASE="test"
declare -x PGHOST="host"
declare -x PGLIB="/usr/local/pgsql/lib"
declare -x PGPASSWORD="passwd"
declare -x PGPPATH="/home/mergl/pgp"
declare -x PGUSER="user"
mergl@sls> perl -e 'use Pg; $dbconn = Pg::connectdb(""); $0 = "name"; system("echo \$PGUSER:\$PGDATABASE");'
user:test
mergl@sls> 


so it's not related to pgsql_perl5, it must be related to your environment.


Edmund


-- 
Edmund Mergl
mailto:E.Mergl@bawue.de
http://www.bawue.de/~mergl